aboutsummaryrefslogtreecommitdiff
path: root/src/boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2009-06-09 07:08:27 +0000
committerdos-reis <gdr@axiomatics.org>2009-06-09 07:08:27 +0000
commita8716de1c3778c147f62d18f1648d8b23163fccf (patch)
treefdcef0df213b4d7c755f05d7d8dcaa07d484fdb4 /src/boot
parent5eacf6339b7768a4c6d048d5fce6c5aff8c2d62a (diff)
downloadopen-axiom-a8716de1c3778c147f62d18f1648d8b23163fccf.tar.gz
* interp/compiler.boot (compLogicalNot): Tidy.
* interp/define.boot (doIt): Tidy conditional case. * boot/tokens.boot: 'fourth' is a now a builtin function.
Diffstat (limited to 'src/boot')
-rw-r--r--src/boot/tokens.boot3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/boot/tokens.boot b/src/boot/tokens.boot
index 6a98317a..a51fe58b 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-2008, Gabriel Dos Reis.
+-- Copyright (C) 2007-2009, Gabriel Dos Reis.
-- All rights reserved.
--
-- Redistribution and use in source and binary forms, with or without
@@ -242,6 +242,7 @@ for i in [ _
["exit", "EXIT"] , _
["false", 'NIL] , _
["first", "CAR"] , _
+ ["fourth", "CADDDR"] , _
["function","FUNCTION"] , _
["genvar", "GENVAR"] , _
["IN", "MEMBER"] , _