diff options
Diffstat (limited to 'src/boot/strap/parser.clisp')
-rw-r--r-- | src/boot/strap/parser.clisp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/boot/strap/parser.clisp b/src/boot/strap/parser.clisp index 898c6192..7b470d05 100644 --- a/src/boot/strap/parser.clisp +++ b/src/boot/strap/parser.clisp @@ -884,7 +884,8 @@ T)) (DEFUN |bpDef| () - (AND (|bpName|) (|bpStoreName|) (|bpDefTail| #'|%Definition|))) + (OR (AND (|bpName|) (|bpStoreName|) (|bpDefTail| #'|%Definition|)) + (AND (|bpNamespace|) (|bpSimpleDefinitionTail|)))) (DEFUN |bpDDef| () (AND (|bpName|) (|bpDefTail| #'|%Definition|))) @@ -930,8 +931,7 @@ (DEFUN |bpPDefinitionItems| () (|bpParenthesized| #'|bpSemiColonDefinition|)) -(DEFUN |bpComma| () - (OR (|bpModule|) (|bpImport|) (|bpNamespace|) (|bpTuple| #'|bpWhere|))) +(DEFUN |bpComma| () (OR (|bpModule|) (|bpImport|) (|bpTuple| #'|bpWhere|))) (DEFUN |bpTuple| (|p|) (|bpListofFun| |p| #'|bpCommaBackSet| #'|bfTuple|)) |