anchors not working

grierson · Aug 14, 2023 · 9b10e12 · 9b10e12
1 parent 7c050de
commit 9b10e12
Show file tree

Hide file tree

Showing 3 changed files with 33 additions and 4 deletions.
diff --git a/docs/sample.clj b/docs/sample.clj
@@ -1,5 +1,2 @@
 (+ 1 2 3)
 [1 2 3]
-'(1 2 3)
-#{1 2 3}
-{:a 1 :b 2}
diff --git a/docs/textobjects.scm b/docs/textobjects.scm
@@ -0,0 +1,30 @@
+[(list_lit)
+(quoting_lit)
+(vec_lit)
+(set_lit)
+(anon_fn_lit)
+(map_lit)] @form.outer
+
+; -- Works: Get List start and end
+; (list_lit . value: (_) @_start value: (_) @end .)
+
+; -- Works: Get Vector start and end
+; (vec*lit . value: (_) @_start value: (_) @end .)
+
+; -- Works: List inner range
+; ((list_lit . value: (_) @_start value: (_) @end .)
+; (#make-range! "form.inner" @start @end))
+
+; -- Works: Vector inner range
+; ((vec_lit . value: (_) @_start value: (_) @end .)
+; (#make-range! "form.inner" @start @end))
+
+; -- Fails: List or Vector inner start and end
+; ([list_lit vec_lit] . value: (_) @start value: (_) @end .)
+
+; -- Fails: List or Vector inner range
+; (([list_lit vec_lit] . value: (_) @start value: (_) @end .)
+; (#make-range! "form.inner" @start @end))
+
+@start
+@end
diff --git a/queries/clojure/textobjects.scm b/queries/clojure/textobjects.scm
@@ -5,6 +5,8 @@
  (anon_fn_lit)
  (map_lit)] @form.outer)
 
+; ((list_lit . value: (_) @_start value: (_) @_end .)
+;  (#make-range! "form.inner" @_start @_end))
 
-((list_lit . value: (_) @_start value: (_) @_end .)
+((vec_lit . value: (_) @_start value: (_) @_end .)
  (#make-range! "form.inner" @_start @_end))