aboutsummaryrefslogtreecommitdiff
path: root/src/interp/metalex.lisp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2009-03-01 07:15:10 +0000
committerdos-reis <gdr@axiomatics.org>2009-03-01 07:15:10 +0000
commit18e478cfb26865634334253465dbda7e67dd8699 (patch)
tree191a334631bbde6905c7ac3fdc98eb9ea75902e3 /src/interp/metalex.lisp
parentc42526006076b88ff2755f33eb1defd2e455e67e (diff)
downloadopen-axiom-18e478cfb26865634334253465dbda7e67dd8699.tar.gz
* interp/compiler.boot (compTopLevel): Initialize list of
optimizable domain constructors. (processInlineRequest): New. * interp/define.boot (spadCompileOrSetq): Tidy. (mutateToNothing): New. (doIt): Use it. Add support for inline directives. * interp/fnewmeta.lisp (PARSE-Inline): New. * interp/metalex.lisp (KEYWORDS): Include 'inline'.
Diffstat (limited to 'src/interp/metalex.lisp')
-rw-r--r--src/interp/metalex.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/metalex.lisp b/src/interp/metalex.lisp
index 5a4d718d..aebd2aaa 100644
--- a/src/interp/metalex.lisp
+++ b/src/interp/metalex.lisp
@@ -575,7 +575,7 @@ empty (if File-Closed (return nil))
|has| |with| |add| |case| |in| |by| |pretend| |mod|
|exquo| |div| |quo| |else| |rem| |then| |suchthat|
|if| |yield| |iterate| |from| |exit| |leave| |return|
- |not| |unless| |repeat| |until| |while| |for| |import|)
+ |not| |unless| |repeat| |until| |while| |for| |import| |inline|)
"Alphabetic literal strings occurring in the New Meta code constitute
keywords. These are recognized specifically by the AnyId production,