diff --git a/src/Kernel/StrScan.ZC b/src/Kernel/StrScan.ZC
index 5dd2a2df..126e1317 100755
--- a/src/Kernel/StrScan.ZC
+++ b/src/Kernel/StrScan.ZC
@@ -13,18 +13,16 @@ I64 Str2I64(U8 *st, I64 radix=10, U8 **_end_ptr=NULL)
 	}
 	while (Bt(char_bmp_white_space, *st))
 		st++;
+	if (*st == '+')
+		st++;
+	else if (*st == '-')
+	{
+		neg = TRUE;
+		st++;
+	}
 	while (TRUE)
 		switch (*st)
 		{
-			case '-':
-				st++;
-				neg = !neg;
-				break;
-
-			case '+':
-				st++;
-				break;
-
 			case '0':
 				st++;
 				ch = ToUpper(*st);