From 31953c9fa1c8f72378086729c87a0aaf9a1d6cf4 Mon Sep 17 00:00:00 2001
From: crumbtoo <crumb@disroot.org>
Date: Fri, 10 Nov 2023 17:43:52 -0700
Subject: [PATCH] uhh it shares now hooray for redex updation

---
 src/TI.hs | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/src/TI.hs b/src/TI.hs
index 9900da5..38c4a90 100644
--- a/src/TI.hs
+++ b/src/TI.hs
@@ -225,9 +225,6 @@ instance Pretty TiState where
 
             pnode (NSupercomb n _ _) _ = IStr n
 
-            pnodeRef :: Addr -> Int -> ISeq
-            pnodeRef a p = IStr (show a) <> "@" <> pnode (hLookupUnsafe a h) p
-
             -- pnoderef :: Addr -> Int -> ISeq
             -- pnoderef a p = bracketPrec 0 p $
             --     IStr (show a) <> " -> " <> pnode (hLookupUnsafe a h) 0