From d541e0f84ae8f82f70e2393207d359975841facf Mon Sep 17 00:00:00 2001
From: Tom Smeding <tom.smeding@gmail.com>
Date: Wed, 20 Nov 2019 22:47:52 +0100
Subject: lambdarec for singly-recursive lambda's

---
 Intermediate.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Intermediate.hs')

diff --git a/Intermediate.hs b/Intermediate.hs
index c72e81c..0e181a4 100644
--- a/Intermediate.hs
+++ b/Intermediate.hs
@@ -29,7 +29,7 @@ data Ref
 
 data InsCode
     = IAssign Ref
-    | IParam Int
+    | IParam Int  -- first param is self-recurse link
     | IClosure Int
     | IData Int
     | ICallC Ref [Ref]
-- 
cgit v1.2.3-70-g09d2