klisp

commit 1b7140e60869b64df8ec987efe7c5ca97e0f22d0
parent 28b2760053ad8fcf3691322eff3e2a24bfda8640
Author: Andres Navarro <canavarro82@gmail.com>
Date:   Fri, 15 Apr 2011 18:00:54 -0300

merged sign bugfix

Diffstat:
M
src/ktoken.c
 | 
2
+-

1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/ktoken.c b/src/ktoken.c
@@ -458,7 +458,7 @@ TValue ktok_read_maybe_signed_numeric(klisp_State *K)
 	return new_sym;
     } else {
 	ks_tbadd(K, ch);
-	int32_t buf_len = ktok_read_until_delimiter(K);
+	int32_t buf_len = ktok_read_until_delimiter(K)+1;
 	char *buf = ks_tbget_buffer(K);
 	/* no exactness or radix prefix, default radix: 10 */
 	return ktok_read_number(K, buf, buf_len, false, false, false, 10);