diff options
author | Xavier Leroy <xavier.leroy@inria.fr> | 2008-08-06 09:38:25 +0000 |
---|---|---|
committer | Xavier Leroy <xavier.leroy@inria.fr> | 2008-08-06 09:38:25 +0000 |
commit | c049cec891438b4bd3382f80feda9436d5e9bce5 (patch) | |
tree | 34940c52ae582d4f206756ecc7a935531ed68278 /byterun/parsing.c | |
parent | 8248cebe5d095949439f789e2d0e9ccdfed15f2c (diff) |
PR#4367: added Parsing.set_trace to control the printing of a trace of actions for ocamlyacc-generated parsers
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@8983 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'byterun/parsing.c')
-rw-r--r-- | byterun/parsing.c | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/byterun/parsing.c b/byterun/parsing.c index 2d90fa552..23228bf7b 100644 --- a/byterun/parsing.c +++ b/byterun/parsing.c @@ -291,3 +291,12 @@ CAMLprim value caml_parse_engine(struct parser_tables *tables, } } + +/* Control printing of debugging info */ + +CAMLprim value caml_set_parser_trace(value flag) +{ + value oldflag = Val_bool(caml_parser_trace); + caml_parser_trace = Bool_val(flag); + return oldflag; +} |