jeltz/heptagon
1
0
Fork 0
Code Issues Pull requests Releases Activity

Allow compilation without mls_parsing etc.

Browse source
This commit is contained in:
Léonard Gérard 2010-09-10 17:10:06 +02:00
parent 44e7a84c00
commit 8a396074fa
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
compiler/minils/main/mls_compiler.ml
View file

@ -11,7 +11,7 @@ open Location
open Compiler_utils
let pp p = if !verbose then Mls_printer.print stdout p
(*
let parse parsing_fun lexing_fun lexbuf =
try
parsing_fun lexing_fun lexbuf
@ -27,7 +27,7 @@ let parse parsing_fun lexing_fun lexbuf =
let parse_implementation prog_name lexbuf =
let p = parse Mls_parser.program Mls_lexer.token lexbuf in
{ p with Mls_parsetree.p_modname = prog_name }
*)
let compile pp p =
(* Clocking *)
let p = pass "Clocking" true Clocking.program p pp in