diff options
author | Sverker Eriksson <[email protected]> | 2017-11-15 14:42:06 +0100 |
---|---|---|
committer | GitHub <[email protected]> | 2017-11-15 14:42:06 +0100 |
commit | 0d9d1f1915ac70ba00418fd24a4293bb22c4fade (patch) | |
tree | 49df7cdfbd1e211dc7aace5db5ce7e3af6e40909 /erts/emulator/hipe/hipe_native_bif.c | |
parent | 1836281f02004db2cc0185b877552377cd436d9a (diff) | |
parent | 7503303b0cba1e02320bdf604e0d0997b7c2ff59 (diff) | |
download | otp-0d9d1f1915ac70ba00418fd24a4293bb22c4fade.tar.gz otp-0d9d1f1915ac70ba00418fd24a4293bb22c4fade.tar.bz2 otp-0d9d1f1915ac70ba00418fd24a4293bb22c4fade.zip |
Merge PR-1621 from margnus1/hipe-literal-tag
HiPE: Support for literal tag, tests and bugfixes
Diffstat (limited to 'erts/emulator/hipe/hipe_native_bif.c')
-rw-r--r-- | erts/emulator/hipe/hipe_native_bif.c | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/erts/emulator/hipe/hipe_native_bif.c b/erts/emulator/hipe/hipe_native_bif.c index f5471285c2..99c34532b9 100644 --- a/erts/emulator/hipe/hipe_native_bif.c +++ b/erts/emulator/hipe/hipe_native_bif.c @@ -497,16 +497,12 @@ int hipe_bs_validate_unicode_retract(ErlBinMatchBuffer* mb, Eterm arg) return 1; } -/* Called via standard_bif_interface_2 */ -BIF_RETTYPE nbif_impl_hipe_is_divisible(NBIF_ALIST_2) +Uint hipe_is_divisible(Uint dividend, Uint divisor) { - /* Arguments are Eterm-sized unsigned integers */ - Uint dividend = BIF_ARG_1; - Uint divisor = BIF_ARG_2; if (dividend % divisor) { - BIF_ERROR(BIF_P, BADARG); + return 0; } else { - return NIL; + return 1; } } |