Explorar o código

new mod implementation (more portable).

Roberto Ierusalimschy %!s(int64=29) %!d(string=hai) anos
pai
achega
cc02b4729b
Modificáronse 1 ficheiros con 4 adicións e 4 borrados
  1. 4 4
      mathlib.c

+ 4 - 4
mathlib.c

@@ -3,7 +3,7 @@
 ** Mathematics library to LUA
 */
 
-char *rcs_mathlib="$Id: mathlib.c,v 1.16 1996/04/25 14:10:00 roberto Exp roberto $";
+char *rcs_mathlib="$Id: mathlib.c,v 1.17 1996/04/30 21:13:55 roberto Exp roberto $";
 
 #include <stdlib.h>
 #include <math.h>
@@ -92,9 +92,9 @@ static void math_floor (void)
 
 static void math_mod (void)
 {
- int d1 = (int)lua_check_number(1, "mod");
- int d2 = (int)lua_check_number(2, "mod");
- lua_pushnumber (d1%d2);
+  float x = lua_check_number(1, "mod");
+  float y = lua_check_number(2, "mod");
+  lua_pushnumber(fmod(x, y));
 }