aboutsummaryrefslogtreecommitdiff
path: root/src/boot/parser.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/boot/parser.boot')
-rw-r--r--src/boot/parser.boot8
1 files changed, 5 insertions, 3 deletions
diff --git a/src/boot/parser.boot b/src/boot/parser.boot
index 8c67c7c6..f2c0a721 100644
--- a/src/boot/parser.boot
+++ b/src/boot/parser.boot
@@ -362,7 +362,6 @@ bpName() ==
bpAnyNo function bpQualifiedName
false
-
++ Constant:
++ INTEGER
++ FLOAT
@@ -445,10 +444,13 @@ bpModule() ==
++ Import:
++ IMPORT Signature FOR Name
++ IMPORT Name
-++ IMPORT Namespace
+++ IMPORT NAMESPACE LongName
bpImport() ==
bpEqKey "IMPORT" =>
- bpNamespace() => bpPush %Import bpPop1()
+ bpEqKey "NAMESPACE" =>
+ bpLeftAssoc('(DOT),function bpName) and
+ bpPush %Import bfNamespace bpPop1()
+ or bpTrap()
a := bpState()
bpName() or bpTrap()
bpEqPeek "COLON" =>