~ chicken-core (chicken-5) 0b2b134b61ddcbbdad35020d6155ffdb2b3bcc0a


commit 0b2b134b61ddcbbdad35020d6155ffdb2b3bcc0a
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Mon Feb 21 10:08:30 2011 +0100
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Mon Feb 21 10:08:30 2011 +0100

    yet another brokenness in arg_val (tanks to ckeen for reporting this)

diff --git a/runtime.c b/runtime.c
index 4585d726..8cd68600 100644
--- a/runtime.c
+++ b/runtime.c
@@ -1281,8 +1281,7 @@ C_word arg_val(C_char *arg)
   case 'g':
   case 'G': mul = 1024 * 1024 * 1024; break;
 
-  default:
-    return 0;
+  default: mul = 1;
   }
 
   val = strtol(arg, &end, 10);
Trap