X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;ds=sidebyside;f=sem.dcl;h=a5705977b29780197eb20ccbb152a641a1422df9;hb=c5fb28639ae923d9b55f5832e45186911e610991;hp=265662443e1d920d3edc859bad908814b7b3485d;hpb=de448d981d7f4b3d78dc09d9eea4c492ec44bc76;p=cc1516.git

diff --git a/sem.dcl b/sem.dcl
index 2656624..a570597 100644
--- a/sem.dcl
+++ b/sem.dcl
@@ -13,4 +13,4 @@ from StdOverloaded import class toString
 instance toString SemError
 instance toString Gamma
 
-sem :: AST -> Either [SemError] Constraints
+sem :: AST -> Either [SemError] (AST, Gamma)