st/lama_byterun
1
0
Fork 0
mirror of https://github.com/ProgramSnail/Lama.git synced 2026-01-04 21:19:08 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fixed paths

Browse source
This commit is contained in:
Dmitry Boulytchev 2024-11-01 22:16:30 +03:00
parent 0553fc764d
commit 09810470fc
86 changed files with 152 additions and 670 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/X86_32.ml
View file

@ -807,11 +807,6 @@ let genasm cmd prog =
code);
Buffer.contents asm
let get_std_path () =
match Sys.getenv_opt "LAMA" with
| Some s -> s
| None -> Stdpath.path
(* Builds a program: generates the assembler file and compiles it with the gcc toolchain *)
let build cmd prog =
let find_objects imports paths =
@ -834,7 +829,7 @@ let build cmd prog =
in
cmd#dump_file "s" (genasm cmd prog);
cmd#dump_file "i" (Interface.gen prog);
let inc = get_std_path () in
let inc = cmd#get_runtime_path in
match cmd#get_mode with
| `Default ->
let objs = find_objects (fst @@ fst prog) cmd#get_include_paths in