Fixes to scope support

cursorless-dev · Jan 23, 2024 · 3c33878 · 3c33878
1 parent e693298
commit 3c33878
Showing 1 changed file with 29 additions and 30 deletions.
diff --git a/packages/common/src/scopeSupportFacets/haskell.ts b/packages/common/src/scopeSupportFacets/haskell.ts
@@ -20,7 +20,9 @@ export const haskellScopeSupport: LanguageScopeSupportFacetMap = {
   "statement.iteration.block": unsupported,
 
   class: unsupported,
+  // "class.instance": unsupported,
   className: unsupported,
+
   namedFunction: supported,
   "namedFunction.method": unsupported,
   anonymousFunction: unsupported,
@@ -31,57 +33,54 @@ export const haskellScopeSupport: LanguageScopeSupportFacetMap = {
   functionCallee: unsupported,
   "functionCallee.constructor": unsupported,
 
-  "argument.actual": supported,
-  "argument.actual.iteration": supported,
-  "argument.formal": unsupported,
-  "argument.formal.iteration": unsupported,
+  "argument.actual": unsupported,
+  "argument.actual.iteration": unsupported,
+  "argument.formal": supported,
+  "argument.formal.iteration": supported,
 
   "comment.line": unsupported,
   "comment.block": unsupported,
 
   "string.singleLine": unsupported,
-  "string.multiLine": notApplicable,
 
   "branch.match": supported,
   "branch.match.iteration": supported,
   "branch.if": unsupported,
   "branch.if.iteration": unsupported,
-  "branch.try": notApplicable,
-  "branch.switchCase": notApplicable,
-  "branch.switchCase.iteration": notApplicable,
-  "branch.ternary": notApplicable,
+  "branch.ternary": unsupported,
 
   "condition.if": unsupported,
-  "condition.while": notApplicable,
-  "condition.doWhile": notApplicable,
-  "condition.for": notApplicable,
-  "condition.ternary": notApplicable,
-  "condition.switchCase": notApplicable,
+  "condition.ternary": unsupported,
 
   "name.assignment": unsupported,
   "name.assignment.pattern": unsupported,
-  "name.foreach": notApplicable,
   "name.function": supported,
   "name.class": unsupported,
   "name.field": unsupported,
 
-  "key.attribute": notApplicable,
-  "key.mapPair": notApplicable,
-  "key.mapPair.iteration": notApplicable,
+  "key.mapPair": unsupported,
+  "key.mapPair.iteration": unsupported,
 
   "value.assignment": unsupported,
   "value.mapPair": unsupported,
   "value.mapPair.iteration": unsupported,
-  "value.attribute": notApplicable,
-  "value.foreach": notApplicable,
-  "value.return": notApplicable,
-  "value.return.lambda": notApplicable,
-  "value.field": notApplicable,
-
-  "type.assignment": notApplicable,
-  "type.formalParameter": notApplicable,
-  "type.return": notApplicable,
-  "type.field": notApplicable,
-  "type.foreach": notApplicable,
-  "type.interface": notApplicable,
+  "value.return": unsupported,
+  "value.return.lambda": unsupported,
+  "value.field": unsupported,
+
+  // "type.adt": unsupported,
+  // "type.alias": unsupported,
+  // "type.annotation": unsupported,
+  // "type.constraint": unsupported,
+  // "type.dataFamily": unsupported,
+  // "type.dataInstance": unsupported,
+  // "type.field": unsupported,
+  // "type.foreignExport": unsupported,
+  // "type.foreignImport": unsupported,
+  "type.formalParameter": unsupported,
+  // "type.function": unsupported,
+  // "type.gadt": unsupported,
+  // "type.newtype": unsupported,
+  // "type.typeFamily": unsupported,
+  // "type.typeInstance": unsupported,
 };