* match.c (v_load): Call parse_once rater than parse.

* parser.c (regex_parse): Likewise.

* txr.c (txr_main): Likewise.

* parser.h (parse): Declaration updated.
(parse_once): Declared.

* parser.y (parse_once): New function, same as old parse implementation.
(parse): Becomes one argument function which works with a previously
initialized parser and continues the parse.

1 files changed, 1 insertions, 1 deletions

diff --git a/match.c b/match.c
index 562e1dfd..b6d4163b 100644
--- a/match.c
+++ b/match.c
@@ -3725,7 +3725,7 @@ static val v_load(match_files_ctx *c)
     parser_t parser;
 
     open_txr_file(path, &name, &stream);
-    parse(stream, name, &parser);
+    parse_once(stream, name, &parser);
     gc_state(gc);
 
     if (parser.errors)