From a0480b7ac0705a214136a9a5eb50454abfd67985 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roman=20Smr=C5=BE?= <roman.smrz@seznam.cz>
Date: Sun, 11 Aug 2024 10:43:36 +0200
Subject: Remove emptyVarValue from ExprType class

---
 src/Process.hs | 1 -
 1 file changed, 1 deletion(-)

(limited to 'src/Process.hs')

diff --git a/src/Process.hs b/src/Process.hs
index d048792..48ed40f 100644
--- a/src/Process.hs
+++ b/src/Process.hs
@@ -50,7 +50,6 @@ instance Eq Process where
 instance ExprType Process where
     textExprType _ = T.pack "proc"
     textExprValue n = T.pack "p:" <> textProcName (procName n)
-    emptyVarValue = Process (ProcName T.empty) undefined undefined undefined undefined emptyVarValue
 
     recordMembers = map (first T.pack)
         [ ("node", RecordSelector $ procNode)
-- 
cgit v1.2.3