diff options
author | dos-reis <gdr@axiomatics.org> | 2009-03-01 07:15:10 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2009-03-01 07:15:10 +0000 |
commit | 18e478cfb26865634334253465dbda7e67dd8699 (patch) | |
tree | 191a334631bbde6905c7ac3fdc98eb9ea75902e3 /src/interp/metalex.lisp | |
parent | c42526006076b88ff2755f33eb1defd2e455e67e (diff) | |
download | open-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.lisp | 2 |
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, |