diff options
Diffstat (limited to 'src/boot/strap/translator.clisp')
| -rw-r--r-- | src/boot/strap/translator.clisp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/boot/strap/translator.clisp b/src/boot/strap/translator.clisp index 50553932..11759bc9 100644 --- a/src/boot/strap/translator.clisp +++ b/src/boot/strap/translator.clisp @@ -448,9 +448,9 @@ (T (THROW :OPEN-AXIOM-CATCH-POINT #1#)))) (T #1#)))) (COND ((EQ |found| 'TRAPPED) NIL) - ((NOT (|bStreamNull| (|parserTokens| |ps|))) (|bpGeneralErrorHere|) - NIL) - ((NULL (|parserTrees| |ps|)) (|bpGeneralErrorHere|) NIL) + ((NOT (|bStreamNull| (|parserTokens| |ps|))) + (|bpGeneralErrorHere| |ps|) NIL) + ((NULL (|parserTrees| |ps|)) (|bpGeneralErrorHere| |ps|) NIL) (T (CAR (|parserTrees| |ps|))))))) (DEFUN |genDeclaration| (|n| |t|) |