diff options
author | dos-reis <gdr@axiomatics.org> | 2011-02-22 20:06:03 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2011-02-22 20:06:03 +0000 |
commit | a886a6f8ac9b0bfd65611631875a119693f6c84a (patch) | |
tree | f831563f180ae375afafcba9e355afd29ba57eda /src/boot | |
parent | 063103a398ab7b1fdef378a2128fa1c9da2f070e (diff) | |
download | open-axiom-a886a6f8ac9b0bfd65611631875a119693f6c84a.tar.gz |
* boot/tokens.boot: mmSource is a new selector for modemap datatype.
* interp/wi1.boot: Likewise.
* interp/br-data.boot: Various cleanups.
* interp/c-util.boot: Likewise.
* interp/compiler.boot: Likewise.
* interp/functor.boot: Likewise.
* interp/g-util.boot: Likewise.
* interp/guess.boot: Likewise.
* interp/i-util.boot: Likewise.
* interp/mark.boot: Likewise.
* interp/msgdb.boot: Likewise.
* interp/topics.boot: Likewise.
Diffstat (limited to 'src/boot')
-rw-r--r-- | src/boot/strap/tokens.clisp | 1 | ||||
-rw-r--r-- | src/boot/tokens.boot | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/src/boot/strap/tokens.clisp b/src/boot/strap/tokens.clisp index 3a3ebc82..013f5e2b 100644 --- a/src/boot/strap/tokens.clisp +++ b/src/boot/strap/tokens.clisp @@ -279,6 +279,7 @@ (LIST '|mmImplementation| 'CADADR) (LIST '|mmSignature| 'CDAR) (LIST '|mmTarget| 'CADAR) + (LIST '|mmSource| 'CDDAR) (LIST '|mode| 'CADR) (LIST '|op| 'CAR) (LIST '|opcode| 'CADR) (LIST '|opSig| 'CADR) (LIST 'CDR 'CDR) (LIST '|sig| 'CDDR) diff --git a/src/boot/tokens.boot b/src/boot/tokens.boot index b3227954..26b59767 100644 --- a/src/boot/tokens.boot +++ b/src/boot/tokens.boot @@ -356,6 +356,7 @@ for i in [ _ ["mmImplementation","CADADR"] , _ ["mmSignature", "CDAR"] , _ ["mmTarget", "CADAR"] , _ + ["mmSource", "CDDAR"] , _ ["mode", "CADR"] , _ ["op", "CAR"] , _ ["opcode", "CADR"] , _ |