From a8716de1c3778c147f62d18f1648d8b23163fccf Mon Sep 17 00:00:00 2001 From: dos-reis Date: Tue, 9 Jun 2009 07:08:27 +0000 Subject: * interp/compiler.boot (compLogicalNot): Tidy. * interp/define.boot (doIt): Tidy conditional case. * boot/tokens.boot: 'fourth' is a now a builtin function. --- src/boot/tokens.boot | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/boot') 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"] , _ -- cgit v1.2.3