From f1938eb2af0cefb779c57c341fa3782a7d19b9ce Mon Sep 17 00:00:00 2001 From: Anton Myasnikov Date: Wed, 12 Aug 2020 14:28:51 +0300 Subject: [PATCH] Hotfix: add missing Scoped instances --- tools/lsp/squirrel/src/AST/Scope.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/tools/lsp/squirrel/src/AST/Scope.hs b/tools/lsp/squirrel/src/AST/Scope.hs index c5b0939bc..be18fc517 100644 --- a/tools/lsp/squirrel/src/AST/Scope.hs +++ b/tools/lsp/squirrel/src/AST/Scope.hs @@ -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) \ No newline at end of file +instance Scoped a CollectM (LIGO a) Ctor +instance Scoped a CollectM (LIGO a) ReasonExpr \ No newline at end of file