diff options
Diffstat (limited to 'p9c/lbforth/lbforth9.c')
| -rw-r--r-- | p9c/lbforth/lbforth9.c | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/p9c/lbforth/lbforth9.c b/p9c/lbforth/lbforth9.c index 6ee5fa6..9673da4 100644 --- a/p9c/lbforth/lbforth9.c +++ b/p9c/lbforth/lbforth9.c @@ -414,8 +414,9 @@ parseNumber(byte* word, cell len, dcell* number, cell* notRead, byte* isDouble) { int negative = 0; cell i; - char c; - cell current; + charn + n + *number = 0; *isDouble = 0; @@ -1211,4 +1212,4 @@ main() initscript_pos = (char*)initScript; quit(); return 0; -} \ No newline at end of file +} |