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

Fix all prints

Browse source
This commit is contained in:
Roman Venediktov 2024-02-06 10:27:27 +01:00
parent a91f61dbfa
commit db9067b748
3 changed files with 174 additions and 44 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/X86.ml
View file

@ -497,6 +497,9 @@ let compile_call env ?fname nargs tail =
let add_printf_count =
match fname with
| Some "Lprintf" -> [ Mov (L (nargs - 1), r11) ]
| Some "Lsprintf" -> [ Mov (L (nargs - 1), r11) ]
| Some "Lfprintf" -> [ Mov (L (nargs - 2), r11) ]
| Some "Lfailure" -> [ Mov (L (nargs - 1), r11) ]
| _ -> []
in
let fname = adjust_builtin_function_name fname in