diff options
| author | Kostis Sagonas <[email protected]> | 2016-10-18 13:08:17 +0200 |
|---|---|---|
| committer | Kostis Sagonas <[email protected]> | 2016-10-18 13:08:17 +0200 |
| commit | 0c480fab8830febf8911d2eb6618a144dc90b8cc (patch) | |
| tree | 5935b655fef353a6ffdb249fad2ddfdc89b9bb21 | |
| parent | 05ad4bf027f2b0d489ddd4c966dc3aa1ff9eb84c (diff) | |
| download | otp-0c480fab8830febf8911d2eb6618a144dc90b8cc.tar.gz otp-0c480fab8830febf8911d2eb6618a144dc90b8cc.tar.bz2 otp-0c480fab8830febf8911d2eb6618a144dc90b8cc.zip | |
Change the return type of hipe_bifs:add_ref/2
| -rw-r--r-- | erts/emulator/hipe/hipe_bif0.c | 2 | ||||
| -rw-r--r-- | lib/hipe/cerl/erl_bif_types.erl | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/erts/emulator/hipe/hipe_bif0.c b/erts/emulator/hipe/hipe_bif0.c index 453a452590..57fbbd9403 100644 --- a/erts/emulator/hipe/hipe_bif0.c +++ b/erts/emulator/hipe/hipe_bif0.c @@ -1582,7 +1582,7 @@ BIF_RETTYPE hipe_bifs_add_ref_2(BIF_ALIST_2) ref, callee.mod, callee.fun, callee.ari, ref->address); DBG_TRACE_MFA(callee.mod, callee.fun, callee.ari, "add_ref at %p FROM %T:%T/%u (from %p)", ref, caller.mod, caller.fun, caller.ari, ref->address); - BIF_RET(NIL); + BIF_RET(am_ok); badarg: BIF_ERROR(BIF_P, BADARG); diff --git a/lib/hipe/cerl/erl_bif_types.erl b/lib/hipe/cerl/erl_bif_types.erl index ae9650ba7d..9344eb33fe 100644 --- a/lib/hipe/cerl/erl_bif_types.erl +++ b/lib/hipe/cerl/erl_bif_types.erl @@ -1003,7 +1003,7 @@ type(erlang, tuple_to_list, 1, Xs, Opaques) -> end, Opaques); %%-- hipe_bifs ---------------------------------------------------------------- type(hipe_bifs, add_ref, 2, Xs, Opaques) -> - strict(hipe_bifs, add_ref, 2, Xs, fun (_) -> t_nil() end, Opaques); + strict(hipe_bifs, add_ref, 2, Xs, fun (_) -> t_atom('ok') end, Opaques); type(hipe_bifs, alloc_data, 3, Xs, Opaques) -> strict(hipe_bifs, alloc_data, 3, Xs, fun (_) -> t_integer() end, Opaques); % address |