Add the debug interface file.

The new file Debug.ml contains the interface for generating and
printing debug information. In order to generate debug information
the init function initializes the necessary functions depending
on the -g flag. If the -g is not there all functions are dummy
functions which do nothing.

1 files changed, 1 insertions, 0 deletions

diff --git a/driver/Driver.ml b/driver/Driver.ml
index f53de821..04acf902 100644
--- a/driver/Driver.ml
+++ b/driver/Driver.ml
@@ -682,6 +682,7 @@ let _ =
     Builtins.set C2C.builtins;
     CPragmas.initialize();
     parse_cmdline cmdline_actions;
+    Debug.init (); (* Initialize the debug functions *)
     let nolink = !option_c || !option_S || !option_E || !option_interp in
     if nolink && !option_o <> None && !num_source_files >= 2 then begin
       eprintf "Ambiguous '-o' option (multiple source files)\n";