summaryrefslogtreecommitdiffstats
path: root/txr.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2011-10-26 17:04:26 -0400
committerKaz Kylheku <kaz@kylheku.com>2011-10-26 17:04:26 -0400
commit12c1371bbbb2d8e6f693b3d2e1e5a91c32c63520 (patch)
treee79422ac8ed142b127c42da1597f955d3e69ab94 /txr.c
parentad46d49574ea8ada67d8644c70817502c8591305 (diff)
downloadtxr-12c1371bbbb2d8e6f693b3d2e1e5a91c32c63520.tar.gz
txr-12c1371bbbb2d8e6f693b3d2e1e5a91c32c63520.tar.bz2
txr-12c1371bbbb2d8e6f693b3d2e1e5a91c32c63520.zip
Bugfix: prepared_error_message variable needs to be gc-protected.
* parser.h (parse_init): Declared. * parser.l (parse_init): New function. * txr.c (main): Call parse_init. (txr_main): No need to gc-protect yyin_stream since parse_init does it.
Diffstat (limited to 'txr.c')
-rw-r--r--txr.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/txr.c b/txr.c
index 706e9ee1..410339c5 100644
--- a/txr.c
+++ b/txr.c
@@ -146,6 +146,7 @@ int main(int argc, char **argv)
progname = argv[0] ? utf8_dup_from(argv[0]) : progname;
init(progname, oom_realloc_handler, &stack_bottom);
match_init();
+ parse_init();
return txr_main(argc, argv);
}
@@ -159,7 +160,6 @@ int txr_main(int argc, char **argv)
prot1(&spec_file_str);
yyin_stream = std_input;
- prot1(&yyin_stream);
if (argc <= 1) {
hint();