From af089a02e32f424463e93e147b60222de0839f1e Mon Sep 17 00:00:00 2001 From: dos-reis Date: Fri, 28 May 2010 04:51:23 +0000 Subject: * boot/tokens.boot: args is now a selector. * interp/g-timer.boot: Use integer? in lieu of INTP. * interp/i-syscmd.boot: Likewise. * interp/msgdb.boot: Likewise. --- src/boot/strap/tokens.clisp | 1 + src/boot/tokens.boot | 1 + 2 files changed, 2 insertions(+) (limited to 'src/boot') diff --git a/src/boot/strap/tokens.clisp b/src/boot/strap/tokens.clisp index 43f54797..c3c5105b 100644 --- a/src/boot/strap/tokens.clisp +++ b/src/boot/strap/tokens.clisp @@ -251,6 +251,7 @@ (LIST '|setDef| 6) (LIST '|aGeneral| 4) (LIST '|aMode| 1) (LIST '|aModeSet| 3) (LIST '|aTree| 0) (LIST '|aValue| 2) + (LIST '|args| 'CDR) (LIST '|attributes| 'CADDR) (LIST '|cacheCount| 'CADDDDR) (LIST '|cacheName| 'CADR) diff --git a/src/boot/tokens.boot b/src/boot/tokens.boot index 0c6e8818..6fe50a64 100644 --- a/src/boot/tokens.boot +++ b/src/boot/tokens.boot @@ -314,6 +314,7 @@ for i in [ _ ["aModeSet", 3] , _ ["aTree", 0] , _ ["aValue", 2] , _ + ["args", "CDR"] , _ ["attributes", "CADDR"] , _ ["cacheCount", "CADDDDR"] , _ ["cacheName", "CADR"] , _ -- cgit v1.2.3