st/lama_byterun
1
0
Fork 0
mirror of https://github.com/ProgramSnail/Lama.git synced 2025-12-31 19:18:18 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Sync

Browse source
This commit is contained in:
Dmitry Boulytchev 2018-11-22 17:02:08 +03:00
parent ef8ea21216
commit 23eb95ae33
4 changed files with 6 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/X86.ml
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"
@ -279,7 +279,7 @@ let compile env code =
else [Binop (op, x, y); Or1 y]
)
| LABEL s -> (if env#is_barrier then (env#drop_barrier)#retrieve_stack s else env), [Label s]
| JMP l -> (env#set_stack l)#set_barrier, [Jmp l]
| CJMP (s, l) ->