Drop unused ProcName parameter type instance

1 files changed, 1 insertions, 5 deletions

diff --git a/src/Parser/Statement.hs b/src/Parser/Statement.hs
index 6630fac..e58779b 100644
--- a/src/Parser/Statement.hs
+++ b/src/Parser/Statement.hs
@@ -19,7 +19,7 @@ import qualified Text.Megaparsec.Char.Lexer as L
 import Network (Network, Node)
 import Parser.Core
 import Parser.Expr
-import Process (Process, ProcName(..))
+import Process (Process)
 import Test
 import Util
 
@@ -91,10 +91,6 @@ instance ParamType SourceLine where
     parseParam _ = mzero
     showParamType _ = "<source line>"
 
-instance ParamType ProcName where
-    parseParam _ = procName
-    showParamType _ = "<proc>"
-
 instance ExprType a => ParamType (TypedVarName a) where
     parseParam _ = newVarName
     showParamType _ = "<variable>"