parse types

2023-12-20 14:10:33 -07:00
parent 414312cf98
commit fe90c9afb0
2 changed files with 8 additions and 4 deletions
--- a/src/Core/Syntax.hs
+++ b/src/Core/Syntax.hs
@@ -139,9 +139,6 @@ instance IsString (Expr b) where
 instance IsString Type where
    fromString = TyVar

-instance Semigroup (Program b) where
-    (<>) = coerce $ (<>) @[ScDef b] 
-
 instance (Hashable b) => Semigroup (Program b) where
    (<>) = undefined