]> ocean-lang.org Git - ocean/blobdiff - csrc/parsergen.mdc
parsergen: don't leave garbage in the $0 buffer.
[ocean] / csrc / parsergen.mdc
index 81121430f9b3e6e7c31c1c99aa656e1e3498c281..fbb561cfe7f2a796927474df4f08cad1225fda09 100644 (file)
@@ -2642,6 +2642,7 @@ since the last state which could have been at the start of a line.
 
                                pop(&p, size, do_free);
                                shift(&p, memdup(buf, bufsize), states);
+                               memset(buf, 0, bufsize);
                                if (prod == 0)
                                        accepted = 1;
                                continue;