ABSをより忠実な挙動にした

2016-09-03 18:39:30 +09:00
parent 2705c0cd49
commit 23650bc2ad
1 changed files with 9 additions and 2 deletions
--- a/SMILEBASIC/builtinfunctions.d
+++ b/SMILEBASIC/builtinfunctions.d
@@ -129,9 +129,16 @@ class BuiltinFunction
    }*/
    //static double function(double) ABS = &abs!double;
    //static double function(double) SGN = &sgn!double;
-    static pure nothrow double ABS(double arg1)
+    static Value ABS(Value arg1)
    {
-        return abs(arg1);
+        if (arg1.isInteger)
+        {
+            return Value(abs(arg1.integerValue));
+        }
+        else
+        {
+            return Value(abs(arg1.castDouble));
+        }
    }
    static pure nothrow double SGN(double arg1)
    {