aboutsummaryrefslogtreecommitdiff
path: root/src/boot/tokens.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/boot/tokens.boot')
-rw-r--r--src/boot/tokens.boot6
1 files changed, 5 insertions, 1 deletions
diff --git a/src/boot/tokens.boot b/src/boot/tokens.boot
index ef860684..38310ce0 100644
--- a/src/boot/tokens.boot
+++ b/src/boot/tokens.boot
@@ -1,6 +1,6 @@
-- Copyright (c) 1991-2002, The Numerical Algorithms Group Ltd.
-- All rights reserved.
--- Copyright (C) 2007-2009, Gabriel Dos Reis.
+-- Copyright (C) 2007-2010, Gabriel Dos Reis.
-- All rights reserved.
--
-- Redistribution and use in source and binary forms, with or without
@@ -240,6 +240,7 @@ for i in [ _
["car", "CAR"] , _
["cdr", "CDR"] , _
["cons", "CONS"] , _
+ ["cons?", "CONSP"] , _
["copy", "COPY"] , _
["croak", "CROAK"] , _
["drop", "DROP"] , _
@@ -249,6 +250,7 @@ for i in [ _
["fourth", "CADDDR"] , _
["function","FUNCTION"] , _
["genvar", "GENVAR"] , _
+ ["integer?","INTEGERP"] , _
["lastNode", "LAST"] , _
["LAST", "last"] , _
["list", "LIST"] , _
@@ -270,7 +272,9 @@ for i in [ _
["setPart", "SETELT"] , _
["setUnion", "UNION"] , _
["strconc", "CONCAT"] , _
+ ["string?", "STRINGP"] ,_
["substitute", "SUBST"] , _
+ ["symbol?", "SYMBOLP"] , _
["take", "TAKE"] ,
["third", "CADDR"] , _
["true", "T"] , _