Skip to content

Commit

Permalink
WIP
Browse files Browse the repository at this point in the history
  • Loading branch information
hhugo committed Sep 30, 2024
1 parent ba8287f commit 95482ab
Showing 1 changed file with 4 additions and 1 deletion.
5 changes: 4 additions & 1 deletion compiler/tests-compiler/gh1051.ml
Original file line number Diff line number Diff line change
Expand Up @@ -23,14 +23,17 @@ let prog = {|let () = Printf.printf "%nx" 0xffffffffn;;|}

let%expect_test _ =
Util.compile_and_run ~skip_modern:true prog;
[%expect {|
[%expect
{|
Warning: integer overflow: integer 0xffffffff (4294967295) truncated to 0xffffffff (-1); the generated code might be incorrect.
ffffffff |}];
()

let%expect_test _ =
Util.print_fun_decl (Util.compile_and_parse prog) None;
[%expect
{|
Warning: integer overflow: integer 0xffffffff (4294967295) truncated to 0xffffffff (-1); the generated code might be incorrect.
function caml_call2(f, a0, a1){
return (f.l >= 0 ? f.l : f.l = f.length) == 2
? f(a0, a1)
Expand Down

0 comments on commit 95482ab

Please sign in to comment.