From 68fc04e61916ebe46d137d9309d71ebcd5c025a3 Mon Sep 17 00:00:00 2001
From: Curtis Yarvin <curtis@tlon.io>
Date: Mon, 20 Aug 2018 15:31:43 -0700
Subject: [PATCH] Eliminate cons optimization.

---
 jets/f/cons.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/jets/f/cons.c b/jets/f/cons.c
index afa641c271..be34fffd2e 100644
--- a/jets/f/cons.c
+++ b/jets/f/cons.c
@@ -18,6 +18,7 @@
                   u3k(p_vur),
                   u3k(p_sed));
     }
+#if 0
     else if ( c3y == u3r_p(vur, 0, &p_vur) &&
               c3y == u3r_p(sed, 0, &p_sed) &&
               !(c3y == u3r_sing(1, p_vur)) &&
@@ -37,6 +38,7 @@
         u3z(nof);
       }
     }
+#endif
     return u3nc(u3k(vur), u3k(sed));
   }
   u3_noun