From 930a4cef72c1b3798edbd7f3a91ee79a5cbb14ad Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <matthias@benkard.de>
Date: Sun, 3 Aug 2008 19:18:31 +0200
Subject: Reimplement VALUES as a function as opposed to a special operator.

---
 MLKInterpreter.m | 20 --------------------
 1 file changed, 20 deletions(-)

(limited to 'MLKInterpreter.m')

diff --git a/MLKInterpreter.m b/MLKInterpreter.m
index 4341e55..8b8600a 100644
--- a/MLKInterpreter.m
+++ b/MLKInterpreter.m
@@ -1204,26 +1204,6 @@ static MLKSymbol *MULTIPLE_VALUE_CALL;
 
               return results;
             }
-          else if (car == VALUES)
-            {
-              id results = [NSMutableArray array];
-              id rest = program;
-
-              while ((rest = [rest cdr]))
-                {
-                  [results addObject:
-                             [[self eval:[rest car]
-                                    inLexicalContext:context
-                                    withEnvironment:lexenv
-                                    expandOnly:expandOnly]
-                               objectAtIndex:0]];
-                }
-
-              if (expandOnly)
-                RETURN_VALUE ([MLKCons cons:VALUES
-                                       with:[MLKCons listWithArray:results]]);
-              return results;
-            }
           else
             {
               if ([context symbolNamesFunction:car])
-- 
cgit v1.2.3