* lib.c (init_str): Bugfix: copy only len characters, not len + 1, so

that we don't clobber the null terminator in the target string, or try
read past the end of the source data.  This affects the @(freeform)
directive.

1 files changed, 1 insertions, 1 deletions

diff --git a/lib.c b/lib.c
index 30d7b661..3135d57f 100644
--- a/lib.c
+++ b/lib.c
@@ -791,7 +791,7 @@ val mkustring(val len)
 
 val init_str(val str, const wchar_t *data)
 {
-  wmemcpy(str->st.str, data, c_num(str->st.len) + 1);
+  wmemcpy(str->st.str, data, c_num(str->st.len));
   return str;
 }