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

Intermediate step to X32/X86

Browse source
This commit is contained in:
Dmitry Boulytchev 2024-08-29 21:13:23 +03:00
parent 172bd13037
commit 8a4ff68165
3 changed files with 5 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/Makefile
View file

@ -47,4 +47,4 @@ clean:
$(OCAMLOPT) -c $(OFLAGS) $(STATIC) $(PXFLAGS) $<
%.cmx: %.ml
$(OCAMLOPT) -c $(OFLAGS) $(STATIC) $(PXFLAGS) $<
$(OCAMLOPT) -c $(OFLAGS) $(STATIC) $(PXFLAGS) $<

2
src/X32.ml → src/X86_32.ml
View file

@ -551,7 +551,7 @@ let compile cmd env imports code =
invalid_arg (Printf.sprintf "invalid SM insn: %s\n" (GT.show(insn) i))
in
let env'', code'' = compile' env' scode' in
env'', [Meta (Printf.sprintf "# %s / % s" (GT.show(SM.insn) instr) stack)] @ code' @ code''
env'', [Meta (Printf.sprintf "# %s / %s" (GT.show(SM.insn) instr) stack)] @ code' @ code''
in
compile' env code

5
src/dune
View file

@ -45,7 +45,7 @@
(library
(name liba)
(modules Language Pprinter stdpath version X86_64 SM Options)
(modules Language Pprinter stdpath version X86_32 X86_64 SM Options)
(libraries GT ostap posix-uname)
(flags
(:standard
@ -59,11 +59,12 @@
(per_module
((pps GT.ppx_all)
SM
X86)
X86_64)
((action
(run %{project_root}/src/pp5+gt+plugins+ostap+dump.byte %{input-file}))
Language
Pprinter
X86_32
stdpath
version)))
(preprocessor_deps