This commit is contained in:
Dmitry Boulytchev 2018-12-03 14:20:47 +03:00
parent 23eb95ae33
commit ea4753556e
2 changed files with 2 additions and 2 deletions

View file

@ -4,7 +4,7 @@ let parse infile =
let s = Util.read infile in
Util.parse
(object
inherit Matcher.stream s
inherit Matcher.t s
inherit Util.Lexers.decimal s
inherit Util.Lexers.string s
inherit Util.Lexers.char s

View file

@ -103,7 +103,7 @@ open SM
of x86 instructions
*)
let compile env code =
SM.print_prg code;
(*SM.print_prg code;*)
flush stdout;
let suffix = function
| "<" -> "l"