From 65ef1c7e6df33a74278d2d9fe6de8d09a5416bba Mon Sep 17 00:00:00 2001
From: pingu <nor@acorneroftheweb.com>
Date: Tue, 25 Nov 2025 19:51:42 +0100
Subject: [PATCH] Baaa

---
 3or4/Interpreter/Self.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/3or4/Interpreter/Self.hs b/3or4/Interpreter/Self.hs
index b09ea02..0ff6951 100644
--- a/3or4/Interpreter/Self.hs
+++ b/3or4/Interpreter/Self.hs
@@ -70,7 +70,7 @@ lookupExp =
   \ -- TODO: Fix for Nil() \
   \ { Cons(b,bs) -> \
   \     case b of \
-  \       { Branch(c', bs, e') -> if (equal c c') Pair(bs,e') (lookup bs) } \
+  \       { Branch(c', xs, e') -> if (equal c c') Pair(xs,e') (lookup bs) } \
   \ }"
 
 substsExp :: Exp