diff options
Diffstat (limited to 'src/boot/strap/translator.clisp')
| -rw-r--r-- | src/boot/strap/translator.clisp | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/boot/strap/translator.clisp b/src/boot/strap/translator.clisp index 623bd82f..c9d4a9d5 100644 --- a/src/boot/strap/translator.clisp +++ b/src/boot/strap/translator.clisp @@ -434,8 +434,7 @@ (DEFUN |shoeOutParse| (|toks|) (LET* (|found| |ps|) (DECLARE - (SPECIAL |$bpCount| |$returns| |$typings| |$wheredefs| |$op| |$ttok| - |$stok|)) + (SPECIAL |$returns| |$typings| |$wheredefs| |$op| |$ttok| |$stok|)) (PROGN (SETQ |ps| (|makeParserState| |toks|)) (SETQ |$stok| NIL) @@ -444,7 +443,6 @@ (SETQ |$wheredefs| NIL) (SETQ |$typings| NIL) (SETQ |$returns| NIL) - (SETQ |$bpCount| 0) (|bpFirstTok| |ps|) (SETQ |found| (LET ((#1=#:G729 |