diff options
| -rw-r--r-- | liblali.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -701,7 +701,7 @@ void writeObject(Object *object, bool readably, FILE *file) { case type: \ fprintf(file, __VA_ARGS__); \ break - CASE(TYPE_NUMBER, "%s", removeZeroPadding(object->string)); + CASE(TYPE_NUMBER, "%s", object->string); /* CASE(TYPE_NUMBER, (object->number < 0) ? "%g" : "+%g", object->number); */ CASE(TYPE_SYMBOL, "%s", object->string); CASE(TYPE_PRIMITIVE, "#<Primitive %s>", object->name); @@ -993,7 +993,7 @@ Object *primitiveRandom(Object **args, GC_PARAM) { else \ sprintf(resString, fmtpos, result); \ \ - object = newNumber(resString, GC_ROOTS); \ + object = newNumber(removeZeroPadding(resString), GC_ROOTS); \ } \ \ return object; \ |
