summaryrefslogtreecommitdiffstats
path: root/byterun/parsing.c
diff options
context:
space:
mode:
authorXavier Leroy <xavier.leroy@inria.fr>2008-08-06 09:38:25 +0000
committerXavier Leroy <xavier.leroy@inria.fr>2008-08-06 09:38:25 +0000
commitc049cec891438b4bd3382f80feda9436d5e9bce5 (patch)
tree34940c52ae582d4f206756ecc7a935531ed68278 /byterun/parsing.c
parent8248cebe5d095949439f789e2d0e9ccdfed15f2c (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.c9
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;
+}