Bugfix in ctrl2ept: do not reset symbol table after loading type declarations

This commit is contained in:
Nicolas Berthier 2015-09-21 15:17:30 +02:00
parent 14a7b67a70
commit fb6755efb2

View file

@ -107,7 +107,6 @@ let mk_std_oc =
(** Parses the given input file. *)
let parse_input ?filename (parse: ?filename:string -> _) =
try
CtrlNbac.Symb.reset ();
let s, n, msgs = parse ?filename () in
report_msgs ?filename msgs;
s, n
@ -252,6 +251,7 @@ let main () =
(* -------------------------------------------------------------------------- *)
(** Launch the [main] *)
let _ =
(* CtrlNbac.Symb.reset (); <- not needed as we have only one input file. *)
try
main ()
with