Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Add value<->native_pointer intrinsics #855

Merged
merged 15 commits into from
Oct 10, 2022
Prev Previous commit
Next Next commit
allow allocating two registers
  • Loading branch information
TheNumbat committed Oct 4, 2022
commit 09dca6b24f25a689ea26cbe2b4685517e742e72a
2 changes: 1 addition & 1 deletion backend/reloadgen.ml
Original file line number Diff line number Diff line change
Expand Up @@ -75,7 +75,7 @@ method reload_operation op arg res =
so that the presence of a probe does not affect
register allocation of the rest of the code. *)
(arg, res)
| Iopaque | Ivalueofint | Iintofvalue ->
| Iopaque ->
(* arg = result, can be on stack or register *)
assert (arg.(0).stamp = res.(0).stamp);
(arg, res)
Expand Down
3 changes: 0 additions & 3 deletions backend/selectgen.ml
Original file line number Diff line number Diff line change
Expand Up @@ -894,9 +894,6 @@ method emit_expr (env:environment) exp =
let rd = self#insert_op_debug env new_op dbg r1 rd in
set_traps_for_raise env;
Some rd
| Iintofvalue | Ivalueofint ->
let rs = self#emit_tuple env simple_args in
Some (self#insert_op_debug env new_op dbg rs rs)
| op ->
let r1 = self#emit_tuple env new_args in
let rd = self#regs_for ty in
Expand Down