Skip to content
This repository was archived by the owner on Apr 1, 2025. It is now read-only.

Commit 89cdd3b

Browse files
committed
Reformat the signature for typecheckingAnalysis.
1 parent 7d336c9 commit 89cdd3b

File tree

1 file changed

+9
-1
lines changed

1 file changed

+9
-1
lines changed

semantic-core/src/Analysis/Typecheck.hs

Lines changed: 9 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -116,7 +116,15 @@ runFile file = traverse run file
116116
v <$ for_ bs (unify v))
117117
. convergeTerm (fix (cacheTerm . eval typecheckingAnalysis))
118118

119-
typecheckingAnalysis :: (Alternative m, Carrier sig m, Member Fresh sig, Member (State (Set.Set Constraint)) sig, Member (State (Heap User (Term Monotype Meta))) sig, MonadFail m) => Analysis User (Term Monotype Meta) m
119+
typecheckingAnalysis
120+
:: ( Alternative m
121+
, Carrier sig m
122+
, Member Fresh sig
123+
, Member (State (Set.Set Constraint)) sig
124+
, Member (State (Heap User (Term Monotype Meta))) sig
125+
, MonadFail m
126+
)
127+
=> Analysis User (Term Monotype Meta) m
120128
typecheckingAnalysis = Analysis{..}
121129
where alloc = pure
122130
bind _ _ = pure ()

0 commit comments

Comments
 (0)