1 files changed, 7 insertions, 2 deletions
diff --git a/liblali.c b/liblali.c
index 7fcacd8..d49e0f2 100644
--- a/liblali.c
+++ b/liblali.c
@@ -1010,7 +1010,12 @@ Object *primitiveRandom(Object **args, GC_PARAM) {
         else                                                                          \
           sprintf(resString, fmtpos, result);                                         \
                                                                                       \
-        object = newNumber(removeZeroPadding(resString), GC_ROOTS);                   \
+		  strcpy(resString, removeZeroPadding(resString));                              \
+                                                                                      \
+        if (!strcmp("+-0", resString))                                                \
+			 strcpy(resString, "-0");                                                    \
+                                                                                      \
+        object = newNumber(resString, GC_ROOTS);                                      \
       }                                                                               \
                                                                                       \
       return object;                                                                  \
@@ -1018,7 +1023,7 @@ Object *primitiveRandom(Object **args, GC_PARAM) {
   }
 
 DEFINE_PRIMITIVE_ARITHMETIC(primitiveAdd,       +, "+0", atof, double, "%lf", "+%lf")
-DEFINE_PRIMITIVE_ARITHMETIC(primitiveSubtract,  -, "+0", atof, double, "%lf", "+%lf")
+DEFINE_PRIMITIVE_ARITHMETIC(primitiveSubtract,  -, "-0", atof, double, "%lf", "+%lf")
 DEFINE_PRIMITIVE_ARITHMETIC(primitiveMultiply,  *, "+1", atof, double, "%lf", "+%lf")
 DEFINE_PRIMITIVE_ARITHMETIC(primitiveDivide,    /, "+1", atof, double, "%lf", "+%lf")
 DEFINE_PRIMITIVE_ARITHMETIC(primitiveRemainder, %, "+1", atoi,    int,  "%d",  "+%d")