From 3af9db88b84366172b7d200417ac77139b86aa5d Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <matthias@benkard.de>
Date: Thu, 31 Jul 2008 12:53:19 +0200
Subject: Fix EVAL.

---
 MLKInterpreter.m | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'MLKInterpreter.m')

diff --git a/MLKInterpreter.m b/MLKInterpreter.m
index 2fe49a5..8267880 100644
--- a/MLKInterpreter.m
+++ b/MLKInterpreter.m
@@ -308,7 +308,7 @@ static MLKSymbol *_LOOP;
             }
           else if (car == EVAL)
             {
-              NSArray *evaluand = denullify([[self eval:[program cdr]
+              NSArray *evaluand = denullify([[self eval:[[program cdr] car]
                                                    inLexicalContext:context
                                                    withEnvironment:lexenv
                                                    expandOnly:expandOnly]
-- 
cgit v1.2.3