diff options
author | Kostis Sagonas <[email protected]> | 2013-02-13 09:07:48 +0100 |
---|---|---|
committer | Kostis Sagonas <[email protected]> | 2013-02-13 09:07:48 +0100 |
commit | 3de93a0ec93bab8c7bae8f1e34d61ae260a21583 (patch) | |
tree | 4f5809715c36b532098dcd082bba36c446d5e37d /erts | |
parent | 837d81ae4d1e032e91bbc8f8a54158f5ec61c707 (diff) | |
download | otp-3de93a0ec93bab8c7bae8f1e34d61ae260a21583.tar.gz otp-3de93a0ec93bab8c7bae8f1e34d61ae260a21583.tar.bz2 otp-3de93a0ec93bab8c7bae8f1e34d61ae260a21583.zip |
Change the return value of hipe_bifs:remove_refs_from/1
In order to avoid an ummatched return warning in erts and make the code
more sane, the return value of the bif was changed from [] to 'ok'.
(Probably more hipe_bifs need such changes but they will have to wait.)
While at it, the code of various functions in hipe_unified_loader was
shortened by using lists:foreach/1 instead of explicit recursion.
Diffstat (limited to 'erts')
-rw-r--r-- | erts/emulator/hipe/hipe_bif0.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/erts/emulator/hipe/hipe_bif0.c b/erts/emulator/hipe/hipe_bif0.c index 1562748f2d..059c013322 100644 --- a/erts/emulator/hipe/hipe_bif0.c +++ b/erts/emulator/hipe/hipe_bif0.c @@ -1791,7 +1791,7 @@ BIF_RETTYPE hipe_bifs_remove_refs_from_1(BIF_ALIST_1) if (BIF_ARG_1 == am_all) { hipe_purge_all_refs(); - BIF_RET(NIL); + BIF_RET(am_ok); } if (!term_to_mfa(BIF_ARG_1, &mfa)) @@ -1828,7 +1828,7 @@ BIF_RETTYPE hipe_bifs_remove_refs_from_1(BIF_ALIST_1) caller_mfa->refers_to = NULL; } hipe_mfa_info_table_unlock(); - BIF_RET(NIL); + BIF_RET(am_ok); } |