Commits

Corentin Derbois  committed 10e19e4

Clean stdout

  • Participants
  • Parent commits 599e35b

Comments (0)

Files changed (2)

File src/compiler.ml

 object(this) 
 
   method compile (file:string) =
+    print_endline ("AST " ^ file);
     let ast = this#makeAst file in
       let pp = new Visitor.prettyPrintVisitor in
-        pp#visitTranslationUnit ast;
-        print_endline ("AST " ^ file)
+        pp#visitTranslationUnit ast
 
   method makeAst (file:string) =
     let file_in = open_in file in
 let usage () =
-  print_endline "./scc [FILE...]";
+  print_endline "./scc FILE [FILE...] [-o output]";
   exit 1
 
 let main () =
-  print_endline "SmallCC, oh yeah";
   if (Array.length Sys.argv) == 1 then usage ();
   Option.option#parse ();
   Compiler.compiler# run Option.option#getFiles