Hotfix: add missing Scoped instances

This commit is contained in:
Anton Myasnikov 2020-08-12 14:28:51 +03:00
parent 31b5ffbeef
commit f1938eb2af
No known key found for this signature in database
GPG Key ID: FEB685E6DAA0A95F

View File

@ -114,8 +114,7 @@ addLocalScopes tree =
where
tree0 = either (error . show) id $ runCatch $ unLetRec tree
tree1 = addNameCategories tree0
-- envWithREfs = getEnvTree tree0
envWithRefs = undefined
envWithRefs = getEnvTree tree0
unLetRec
:: forall xs m
@ -412,4 +411,5 @@ instance Scoped a CollectM (LIGO a) FieldName
instance Scoped a CollectM (LIGO a) (Err Text)
instance Scoped a CollectM (LIGO a) Language
instance Scoped a CollectM (LIGO a) Parameters
-- instance Scoped a CollectM (LIGO a) Ctor(Contains Range xs, Eq (Product xs), Scoped (Product xs) CollectM (Tree RawLigoList (Product xs)) ReasonExpr)
instance Scoped a CollectM (LIGO a) Ctor
instance Scoped a CollectM (LIGO a) ReasonExpr