aboutsummaryrefslogtreecommitdiffstats
path: root/erts/emulator/hipe/hipe_native_bif.c
diff options
context:
space:
mode:
authorSverker Eriksson <[email protected]>2017-11-15 14:42:06 +0100
committerGitHub <[email protected]>2017-11-15 14:42:06 +0100
commit0d9d1f1915ac70ba00418fd24a4293bb22c4fade (patch)
tree49df7cdfbd1e211dc7aace5db5ce7e3af6e40909 /erts/emulator/hipe/hipe_native_bif.c
parent1836281f02004db2cc0185b877552377cd436d9a (diff)
parent7503303b0cba1e02320bdf604e0d0997b7c2ff59 (diff)
downloadotp-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.c10
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;
}
}