aboutsummaryrefslogtreecommitdiff
path: root/src/interp/postpar.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-05-02 02:18:44 +0000
committerdos-reis <gdr@axiomatics.org>2011-05-02 02:18:44 +0000
commit29e53d366bd313f432aa744b651875f97438586c (patch)
treef28c87d6e8836b2b02c3b6e06cfe2716b717df65 /src/interp/postpar.boot
parent1906e73ab030ad23f1f6269acfed69703c8c40d6 (diff)
downloadopen-axiom-29e53d366bd313f432aa744b651875f97438586c.tar.gz
* boot/parser.boot (bpDefinition): Accept macro definition
starting with the keyword "MACRO". * boot/translator.boot (exportNames): Export them in all evaluation contexts. * interp/c-util.boot: "macro" is now a keyword. * interp/define.boot: Likewise. * interp/g-util.boot: Likewise. * interp/i-syscmd.boot: Likewise. * interp/postpar.boot: Likewise.
Diffstat (limited to 'src/interp/postpar.boot')
-rw-r--r--src/interp/postpar.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/postpar.boot b/src/interp/postpar.boot
index 3b8d9ec8..736baa83 100644
--- a/src/interp/postpar.boot
+++ b/src/interp/postpar.boot
@@ -217,7 +217,7 @@ postComma u ==
postDef: %ParseTree -> %ParseForm
postDef t ==
t isnt [defOp,lhs,rhs] => systemErrorHere ["postDef",t]
- lhs is ['macro,name] => postMDef ["==>",name,rhs]
+ lhs is ["macro",name] => postMDef ["==>",name,rhs]
recordHeaderDocumentation nil
if $maxSignatureLineNumber ~= 0 then