ATRONIX: Fix: TRACE ON shows bizarre parse behavior

zsx · Oldes · commit f4b30ea95d2a · 2020-03-31T21:29:28.000+02:00
Terminate string with '\0' fixes: Oldes/Rebol-issues#2150 (cherry picked from commit 25d35a9)
diff --git a/src/core/c-do.c b/src/core/c-do.c
@@ -289,8 +289,10 @@ void Trace_Arg(REBINT num, REBVAL *arg, REBVAL *path)
 {
 	static char tracebuf[64];
 	int depth;
+	int len = MIN(60, limit);
 	CHECK_DEPTH(depth);
-	memcpy(tracebuf, str, MIN(60, limit));
+	memcpy(tracebuf, str, len);
+	tracebuf[len] = '\0';
 	Debug_Fmt(BOOT_STR(RS_TRACE,n), tracebuf);
 }
 

Original file line number	Diff line number	Diff line change
`@@ -289,8 +289,10 @@ void Trace_Arg(REBINT num, REBVAL arg, REBVAL path)`
`289`	`289`	`{`
`290`	`290`	`static char tracebuf[64];`
`291`	`291`	`int depth;`
	`292`	`+ int len = MIN(60, limit);`
`292`	`293`	`CHECK_DEPTH(depth);`
`293`		`- memcpy(tracebuf, str, MIN(60, limit));`
	`294`	`+ memcpy(tracebuf, str, len);`
	`295`	`+ tracebuf[len] = '\0';`
`294`	`296`	`Debug_Fmt(BOOT_STR(RS_TRACE,n), tracebuf);`
`295`	`297`	`}`
`296`	`298`