aboutsummaryrefslogtreecommitdiffstats
path: root/erts/emulator
diff options
context:
space:
mode:
authorGuilherme Andrade <[email protected]>2016-10-25 22:05:10 +0100
committerGuilherme Andrade <[email protected]>2016-11-02 18:55:28 +0000
commite21a6c9ec713219b0aa2b2a4224f97e713d7337f (patch)
tree330e95b1d8328a47d3645031ce1ddaf0e2b63496 /erts/emulator
parent37122019312c94df2ca0347417ca50dd8daf1084 (diff)
downloadotp-e21a6c9ec713219b0aa2b2a4224f97e713d7337f.tar.gz
otp-e21a6c9ec713219b0aa2b2a4224f97e713d7337f.tar.bz2
otp-e21a6c9ec713219b0aa2b2a4224f97e713d7337f.zip
Add math:fmod/2 BIF
Returns the (floating point) remainder of first argument divided by second argument.
Diffstat (limited to 'erts/emulator')
-rw-r--r--erts/emulator/beam/bif.tab1
-rw-r--r--erts/emulator/beam/erl_math.c5
2 files changed, 6 insertions, 0 deletions
diff --git a/erts/emulator/beam/bif.tab b/erts/emulator/beam/bif.tab
index 852b1135fe..32600f4338 100644
--- a/erts/emulator/beam/bif.tab
+++ b/erts/emulator/beam/bif.tab
@@ -667,6 +667,7 @@ gcbif erlang:floor/1
gcbif erlang:ceil/1
bif math:floor/1
bif math:ceil/1
+bif math:fmod/2
#
# Obsolete
diff --git a/erts/emulator/beam/erl_math.c b/erts/emulator/beam/erl_math.c
index 990fa63bd4..1f270eb55f 100644
--- a/erts/emulator/beam/erl_math.c
+++ b/erts/emulator/beam/erl_math.c
@@ -256,3 +256,8 @@ BIF_RETTYPE math_floor_1(BIF_ALIST_1)
{
return math_call_1(BIF_P, floor, BIF_ARG_1);
}
+
+BIF_RETTYPE math_fmod_2(BIF_ALIST_2)
+{
+ return math_call_2(BIF_P, fmod, BIF_ARG_1, BIF_ARG_2);
+}