aboutsummaryrefslogtreecommitdiff
path: root/src/boot/strap/parser.clisp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2008-05-08 07:58:35 +0000
committerdos-reis <gdr@axiomatics.org>2008-05-08 07:58:35 +0000
commit78b4bdac02e3f64db5acfa9ebdb1b88696b9a405 (patch)
tree9c8ce4a028ffddddf3d5e05690fc504a8eef6026 /src/boot/strap/parser.clisp
parent777de75052c863d618cb03e083bad5f050f5e6f3 (diff)
downloadopen-axiom-78b4bdac02e3f64db5acfa9ebdb1b88696b9a405.tar.gz
* boot/translator.boot (translateToplevel): Split out of bpOutItem.
(maybeExportDecl): New.
Diffstat (limited to 'src/boot/strap/parser.clisp')
-rw-r--r--src/boot/strap/parser.clisp6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/boot/strap/parser.clisp b/src/boot/strap/parser.clisp
index d07e1228..bb8faa08 100644
--- a/src/boot/strap/parser.clisp
+++ b/src/boot/strap/parser.clisp
@@ -1,11 +1,11 @@
-(PROVIDE "parser")
-
(IMPORT-MODULE "includer")
(IMPORT-MODULE "scanner")
(IMPORT-MODULE "ast")
+(PROVIDE "parser")
+
(IN-PACKAGE "BOOTTRAN")
(DEFPARAMETER |$sawParenthesizedHead| NIL)
@@ -472,7 +472,7 @@
(DEFUN |bpTypeAliasDefition| ()
(AND (OR (|bpTerm|) (|bpTrap|)) (|bpEqKey| 'TDEF) (|bpLogical|)
- (|bpPush| (|TypeAlias| (|bpPop2|) (|bpPop1|)))))
+ (|bpPush| (|%TypeAlias| (|bpPop2|) (|bpPop1|)))))
(DEFUN |bpSignature| ()
(AND (|bpName|) (|bpEqKey| 'COLON) (|bpMapping|)