Merge commit 'bfa6ab18a326d8a37407aedde24843ba1feac1f1'

vendor/tree-sitter-clojure/corpus/anon_fn_lit.txt

@@ -0,0 +1,26 @@
+================================================================================
+Empty Anonymous Function
+================================================================================
+
+#()
+
+--------------------------------------------------------------------------------
+
+(source
+  (anon_fn_lit))
+
+================================================================================
+Anonymous Function
+================================================================================
+
+#(+ % 8)
+
+--------------------------------------------------------------------------------
+
+(source
+  (anon_fn_lit
+    (sym_lit
+      (sym_name))
+    (sym_lit
+      (sym_name))
+    (num_lit)))

vendor/tree-sitter-clojure/corpus/bool_lit.txt

@@ -0,0 +1,21 @@
+================================================================================
+True
+================================================================================
+
+true
+
+--------------------------------------------------------------------------------
+
+(source
+  (bool_lit))
+
+================================================================================
+False
+================================================================================
+
+false
+
+--------------------------------------------------------------------------------
+
+(source
+  (bool_lit))

vendor/tree-sitter-clojure/corpus/char_lit.txt

@@ -0,0 +1,43 @@
+================================================================================
+Simple Char
+================================================================================
+
+\a
+
+--------------------------------------------------------------------------------
+
+(source
+  (char_lit))
+
+================================================================================
+Octal Char
+================================================================================
+
+\o377
+
+--------------------------------------------------------------------------------
+
+(source
+  (char_lit))
+
+================================================================================
+Named Char
+================================================================================
+
+\backspace
+
+--------------------------------------------------------------------------------
+
+(source
+  (char_lit))
+
+================================================================================
+Unicode Char
+================================================================================
+
+\u611B
+
+--------------------------------------------------------------------------------
+
+(source
+  (char_lit))

vendor/tree-sitter-clojure/corpus/comment.txt

@@ -0,0 +1,34 @@
+================================================================================
+Simple Comment
+================================================================================
+
+; a comment
+
+--------------------------------------------------------------------------------
+
+(source
+  (comment))
+
+================================================================================
+Two semicolons
+================================================================================
+
+;; another comment
+
+--------------------------------------------------------------------------------
+
+(source
+  (comment))
+
+================================================================================
+Multiple lines
+================================================================================
+
+;; first line
+;; second line
+
+--------------------------------------------------------------------------------
+
+(source
+  (comment)
+  (comment))

vendor/tree-sitter-clojure/corpus/derefing_lit.txt

@@ -0,0 +1,28 @@
+================================================================================
+Simple Deref
+================================================================================
+
+@x
+
+--------------------------------------------------------------------------------
+
+(source
+  (derefing_lit
+    (sym_lit
+      (sym_name))))
+
+================================================================================
+Deref of Call
+================================================================================
+
+@(ping y)
+
+--------------------------------------------------------------------------------
+
+(source
+  (derefing_lit
+    (list_lit
+      (sym_lit
+        (sym_name))
+      (sym_lit
+        (sym_name)))))

vendor/tree-sitter-clojure/corpus/dis_expr.txt

@@ -0,0 +1,74 @@
+================================================================================
+Discard Number
+================================================================================
+
+#_ 1
+
+--------------------------------------------------------------------------------
+
+(source
+  (dis_expr
+    (num_lit)))
+
+================================================================================
+Discard List
+================================================================================
+
+#_ (+ 1 1)
+
+--------------------------------------------------------------------------------
+
+(source
+  (dis_expr
+    (list_lit
+      (sym_lit
+        (sym_name))
+      (num_lit)
+      (num_lit))))
+
+================================================================================
+Discard Map
+================================================================================
+
+#_ {:a 1
+    :b 2}
+
+--------------------------------------------------------------------------------
+
+(source
+  (dis_expr
+    (map_lit
+      (kwd_lit)
+      (num_lit)
+      (kwd_lit)
+      (num_lit))))
+
+================================================================================
+Discard Multiple
+================================================================================
+
+(let [x 1
+      #_ #_ y 2]
+  (+ x 2))
+
+--------------------------------------------------------------------------------
+
+(source
+  (list_lit
+    (sym_lit
+      (sym_name))
+    (vec_lit
+      (sym_lit
+        (sym_name))
+      (num_lit)
+      (dis_expr
+        (dis_expr
+          (sym_lit
+            (sym_name)))
+        (num_lit)))
+    (list_lit
+      (sym_lit
+        (sym_name))
+      (sym_lit
+        (sym_name))
+      (num_lit))))

vendor/tree-sitter-clojure/corpus/evaling_lit.txt

@@ -0,0 +1,15 @@
+================================================================================
+Not Officially Supported
+================================================================================
+
+#=(+ 1 1)
+
+--------------------------------------------------------------------------------
+
+(source
+  (evaling_lit
+    (list_lit
+      (sym_lit
+        (sym_name))
+      (num_lit)
+      (num_lit))))

vendor/tree-sitter-clojure/corpus/kwd_lit.txt

@@ -0,0 +1,43 @@
+================================================================================
+Keyword
+================================================================================
+
+:smile
+
+--------------------------------------------------------------------------------
+
+(source
+  (kwd_lit))
+
+================================================================================
+Keyword with Prefix
+================================================================================
+
+:fun/day
+
+--------------------------------------------------------------------------------
+
+(source
+  (kwd_lit))
+
+================================================================================
+Autoresolving Keyword
+================================================================================
+
+::run
+
+--------------------------------------------------------------------------------
+
+(source
+  (kwd_lit))
+
+================================================================================
+Autoresolving Keyword with Prefix
+================================================================================
+
+::slow/dance
+
+--------------------------------------------------------------------------------
+
+(source
+  (kwd_lit))

vendor/tree-sitter-clojure/corpus/list_lit.txt

@@ -0,0 +1,105 @@
+================================================================================
+Empty List
+================================================================================
+
+()
+
+--------------------------------------------------------------------------------
+
+(source
+  (list_lit))
+
+================================================================================
+List with Keywords
+================================================================================
+
+(:a :b :c)
+
+--------------------------------------------------------------------------------
+
+(source
+  (list_lit
+    (kwd_lit)
+    (kwd_lit)
+    (kwd_lit)))
+
+================================================================================
+Call with Anonymous Function
+================================================================================
+
+(#(+ % 1) 1)
+
+--------------------------------------------------------------------------------
+
+(source
+  (list_lit
+    (anon_fn_lit
+      (sym_lit
+        (sym_name))
+      (sym_lit
+        (sym_name))
+      (num_lit))
+    (num_lit)))
+
+================================================================================
+Map Lookup
+================================================================================
+
+({:a 1} :a)
+
+--------------------------------------------------------------------------------
+
+(source
+  (list_lit
+    (map_lit
+      (kwd_lit)
+      (num_lit))
+    (kwd_lit)))
+
+================================================================================
+Map Lookup Alternate
+================================================================================
+
+(:b {:b 2})
+
+--------------------------------------------------------------------------------
+
+(source
+  (list_lit
+    (kwd_lit)
+    (map_lit
+      (kwd_lit)
+      (num_lit))))
+
+================================================================================
+Set Lookup
+================================================================================
+
+(#{:c :e} :e)
+
+--------------------------------------------------------------------------------
+
+(source
+  (list_lit
+    (set_lit
+      (kwd_lit)
+      (kwd_lit))
+    (kwd_lit)))
+
+================================================================================
+Call with Symbol with Metadata
+================================================================================
+
+(.get ^ByteBuffer b)
+
+--------------------------------------------------------------------------------
+
+(source
+  (list_lit
+    (sym_lit
+      (sym_name))
+    (sym_lit
+      (meta_lit
+        (sym_lit
+          (sym_name)))
+      (sym_name))))

vendor/tree-sitter-clojure/corpus/map_lit.txt

@@ -0,0 +1,63 @@
+================================================================================
+Empty Map
+================================================================================
+
+{}
+
+--------------------------------------------------------------------------------
+
+(source
+  (map_lit))
+
+================================================================================
+Simple Map
+================================================================================
+
+{:a 1 :b 2}
+
+--------------------------------------------------------------------------------
+
+(source
+  (map_lit
+    (kwd_lit)
+    (num_lit)
+    (kwd_lit)
+    (num_lit)))
+
+================================================================================
+Deeper Map
+================================================================================
+
+{:paths ["src"]
+ :deps {clj-kondo/clj-kondo {:mvn/version "2020.09.09"}}}
+
+--------------------------------------------------------------------------------
+
+(source
+  (map_lit
+    (kwd_lit)
+    (vec_lit
+      (str_lit))
+    (kwd_lit)
+    (map_lit
+      (sym_lit
+        (sym_name))
+      (map_lit
+        (kwd_lit)
+        (str_lit)))))
+
+================================================================================
+Map with Comma
+================================================================================
+
+{:x 1,
+ :y 2}
+
+--------------------------------------------------------------------------------
+
+(source
+  (map_lit
+    (kwd_lit)
+    (num_lit)
+    (kwd_lit)
+    (num_lit)))

vendor/tree-sitter-clojure/corpus/meta_lit.txt

@@ -0,0 +1,92 @@
+================================================================================
+Symbol Metadata
+================================================================================
+
+^String []
+
+--------------------------------------------------------------------------------
+
+(source
+  (vec_lit
+    (meta_lit
+      (sym_lit
+        (sym_name)))))
+
+================================================================================
+Keyword Metadata
+================================================================================
+
+^:private {}
+
+--------------------------------------------------------------------------------
+
+(source
+  (map_lit
+    (meta_lit
+      (kwd_lit))))
+
+================================================================================
+String Metadata
+================================================================================
+
+^"gnarly" {}
+
+--------------------------------------------------------------------------------
+
+(source
+  (map_lit
+    (meta_lit
+      (str_lit))))
+
+================================================================================
+Map Metadata
+================================================================================
+
+^{:x 0 :y 1} #{}
+
+--------------------------------------------------------------------------------
+
+(source
+  (set_lit
+    (meta_lit
+      (map_lit
+        (kwd_lit)
+        (num_lit)
+        (kwd_lit)
+        (num_lit)))))
+
+================================================================================
+Reader Conditional Metadata
+================================================================================
+
+^#?(:clj "vanilla" :cljr "strawberry" :cljs "chocolate") []
+
+--------------------------------------------------------------------------------
+
+(source
+  (vec_lit
+    (meta_lit
+      (read_cond_lit
+        (kwd_lit)
+        (str_lit)
+        (kwd_lit)
+        (str_lit)
+        (kwd_lit)
+        (str_lit)))))
+
+================================================================================
+Multiple Bits of Metadata
+================================================================================
+
+^:wake ^:sit ^:sleep #{}
+
+--------------------------------------------------------------------------------
+
+(source
+  (set_lit
+    (meta_lit
+      (kwd_lit))
+    (meta_lit
+      (kwd_lit))
+    (meta_lit
+      (kwd_lit))))

vendor/tree-sitter-clojure/corpus/nil_lit.txt

@@ -0,0 +1,10 @@
+================================================================================
+Nil
+================================================================================
+
+nil
+
+--------------------------------------------------------------------------------
+
+(source
+  (nil_lit))

vendor/tree-sitter-clojure/corpus/ns_map_lit.txt

@@ -0,0 +1,66 @@
+================================================================================
+Simple Namespace Map
+================================================================================
+
+#:prefix{:a 1 :b 2}
+
+--------------------------------------------------------------------------------
+
+(source
+  (ns_map_lit
+    (kwd_lit)
+    (kwd_lit)
+    (num_lit)
+    (kwd_lit)
+    (num_lit)))
+
+================================================================================
+Nested Namespace Maps
+================================================================================
+
+#:outer{:first "Terence"
+        :last "Tao"
+        :area #:inner{:name "Mathematics"}}
+
+--------------------------------------------------------------------------------
+
+(source
+  (ns_map_lit
+    (kwd_lit)
+    (kwd_lit)
+    (str_lit)
+    (kwd_lit)
+    (str_lit)
+    (kwd_lit)
+    (ns_map_lit
+      (kwd_lit)
+      (kwd_lit)
+      (str_lit))))
+
+================================================================================
+Autoresolving Namespace Map
+================================================================================
+
+#::{}
+
+--------------------------------------------------------------------------------
+
+(source
+  (ns_map_lit
+    (auto_res_mark)))
+
+================================================================================
+Namespace Map that Autoresolves with Alias
+================================================================================
+
+#::s{:x 1 :y 2}
+
+--------------------------------------------------------------------------------
+
+(source
+  (ns_map_lit
+    (kwd_lit)
+    (kwd_lit)
+    (num_lit)
+    (kwd_lit)
+    (num_lit)))

vendor/tree-sitter-clojure/corpus/num_lit.txt

@@ -0,0 +1,241 @@
+================================================================================
+Integer
+================================================================================
+
+1
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+Negative Integer
+================================================================================
+
+-2
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+BigInt Integer
+================================================================================
+
+11N
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+BigDecimal Integer
+================================================================================
+
+99M
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+Hex
+================================================================================
+
+0xaB
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+Negative Hex
+================================================================================
+
+-0xFF
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+Shouting Hex
+================================================================================
+
+0XA
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+BigInt Hex
+================================================================================
+
+0XeN
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+Octal
+================================================================================
+
+013
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+Negative Octal
+================================================================================
+
+-027
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+BigInt Octal
+================================================================================
+
+0377N
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+Radix
+================================================================================
+
+2r0101010001
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+Negative Radix
+================================================================================
+
+-10r256
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+Shouting Radix
+================================================================================
+
+36RBREATHESL0WLY
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+Ratio
+================================================================================
+
+22/7
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+Negative Ratio
+================================================================================
+
+-1/2
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+Double
+================================================================================
+
+1.0
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+Negative Double
+================================================================================
+
+-2.71828
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+Double with Exponent
+================================================================================
+
+3e8
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+Shouting Double with Exponent
+================================================================================
+
+1E9
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+Double with Negative Exponent
+================================================================================
+
+2e-1
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))
+
+================================================================================
+BigDecimal Double with Exponent
+================================================================================
+
+3e1415926535M
+
+--------------------------------------------------------------------------------
+
+(source
+  (num_lit))

vendor/tree-sitter-clojure/corpus/old_meta.lit

@@ -0,0 +1,92 @@
+================================================================================
+Symbol Metadata
+================================================================================
+
+#^String []
+
+--------------------------------------------------------------------------------
+
+(source
+  (vec_lit
+    (old_meta_lit
+      (sym_lit
+        (sym_name)))))
+
+================================================================================
+Keyword Metadata
+================================================================================
+
+#^:private {}
+
+--------------------------------------------------------------------------------
+
+(source
+  (map_lit
+    (old_meta_lit
+      (kwd_lit))))
+
+================================================================================
+String Metadata
+================================================================================
+
+#^"gnarly" {}
+
+--------------------------------------------------------------------------------
+
+(source
+  (map_lit
+    (old_meta_lit
+      (str_lit))))
+
+================================================================================
+Map Metadata
+================================================================================
+
+#^{:x 0 :y 1} #{}
+
+--------------------------------------------------------------------------------
+
+(source
+  (set_lit
+    (old_meta_lit
+      (map_lit
+        (kwd_lit)
+        (num_lit)
+        (kwd_lit)
+        (num_lit)))))
+
+================================================================================
+Reader Conditional Metadata
+================================================================================
+
+#^#?(:clj "vanilla" :cljr "strawberry" :cljs "chocolate") []
+
+--------------------------------------------------------------------------------
+
+(source
+  (vec_lit
+    (old_meta_lit
+      (read_cond_lit
+        (kwd_lit)
+        (str_lit)
+        (kwd_lit)
+        (str_lit)
+        (kwd_lit)
+        (str_lit)))))
+
+================================================================================
+Multiple Bits of Metadata
+================================================================================
+
+#^:wake #^:sit #^:sleep #{}
+
+--------------------------------------------------------------------------------
+
+(source
+  (set_lit
+    (old_meta_lit
+      (kwd_lit))
+    (old_meta_lit
+      (kwd_lit))
+    (old_meta_lit
+      (kwd_lit))))

vendor/tree-sitter-clojure/corpus/quoting_lit.txt

@@ -0,0 +1,27 @@
+================================================================================
+Quoted Symbol
+================================================================================
+
+'a-sym
+
+--------------------------------------------------------------------------------
+
+(source
+  (quoting_lit
+    (sym_lit
+      (sym_name))))
+
+================================================================================
+Quoted List
+================================================================================
+
+'(1 2 3)
+
+--------------------------------------------------------------------------------
+
+(source
+  (quoting_lit
+    (list_lit
+      (num_lit)
+      (num_lit)
+      (num_lit))))

vendor/tree-sitter-clojure/corpus/read_cond_lit.txt

@@ -0,0 +1,18 @@
+================================================================================
+Platform Reader Conditional
+================================================================================
+
+#?(:clj :clj
+   :cljr :cljr
+   :cljs :cljs)
+
+--------------------------------------------------------------------------------
+
+(source
+  (read_cond_lit
+    (kwd_lit)
+    (kwd_lit)
+    (kwd_lit)
+    (kwd_lit)
+    (kwd_lit)
+    (kwd_lit)))

vendor/tree-sitter-clojure/corpus/regex_lit.txt

@@ -0,0 +1,21 @@
+================================================================================
+Simple Regular Expression
+================================================================================
+
+#"."
+
+--------------------------------------------------------------------------------
+
+(source
+  (regex_lit))
+
+================================================================================
+Hex Digits Regular Expression
+================================================================================
+
+#"[0-9a-fA-F]+"
+
+--------------------------------------------------------------------------------
+
+(source
+  (regex_lit))

vendor/tree-sitter-clojure/corpus/set_lit.txt

@@ -0,0 +1,41 @@
+================================================================================
+Empty Set
+================================================================================
+
+#{}
+
+--------------------------------------------------------------------------------
+
+(source
+  (set_lit))
+
+================================================================================
+Simple Set
+================================================================================
+
+#{:i :j :k}
+
+--------------------------------------------------------------------------------
+
+(source
+  (set_lit
+    (kwd_lit)
+    (kwd_lit)
+    (kwd_lit)))
+
+================================================================================
+Nested Sets
+================================================================================
+
+#{#{1} #{#{0} 2}}
+
+--------------------------------------------------------------------------------
+
+(source
+  (set_lit
+    (set_lit
+      (num_lit))
+    (set_lit
+      (set_lit
+        (num_lit))
+      (num_lit))))

vendor/tree-sitter-clojure/corpus/splicing_read_cond_lit.txt

@@ -0,0 +1,35 @@
+================================================================================
+Splicing Reader Conditional
+================================================================================
+
+(list '*
+      #?@(:clj [x y] :cljr [i j] :cljs [a b]))
+
+--------------------------------------------------------------------------------
+
+(source
+  (list_lit
+    (sym_lit
+      (sym_name))
+    (quoting_lit
+      (sym_lit
+        (sym_name)))
+    (splicing_read_cond_lit
+      (kwd_lit)
+      (vec_lit
+        (sym_lit
+          (sym_name))
+        (sym_lit
+          (sym_name)))
+      (kwd_lit)
+      (vec_lit
+        (sym_lit
+          (sym_name))
+        (sym_lit
+          (sym_name)))
+      (kwd_lit)
+      (vec_lit
+        (sym_lit
+          (sym_name))
+        (sym_lit
+          (sym_name))))))

vendor/tree-sitter-clojure/corpus/str_lit.txt

@@ -0,0 +1,33 @@
+================================================================================
+Simple String
+================================================================================
+
+"hello there"
+
+--------------------------------------------------------------------------------
+
+(source
+  (str_lit))
+
+================================================================================
+String with Escapes
+================================================================================
+
+"first line\nsecond\tline"
+
+--------------------------------------------------------------------------------
+
+(source
+  (str_lit))
+
+================================================================================
+Multiline String
+================================================================================
+
+"this is the first line
+and what is this one?"
+
+--------------------------------------------------------------------------------
+
+(source
+  (str_lit))

vendor/tree-sitter-clojure/corpus/sym_lit.txt

@@ -0,0 +1,23 @@
+================================================================================
+Simple Symbol
+================================================================================
+
+def
+
+--------------------------------------------------------------------------------
+
+(source
+  (sym_lit
+    (sym_name)))
+
+================================================================================
+Symbol with Prefix
+================================================================================
+
+clojure.string/blank?
+
+--------------------------------------------------------------------------------
+
+(source
+  (sym_lit
+    (sym_name)))

vendor/tree-sitter-clojure/corpus/sym_val_lit.txt

@@ -0,0 +1,38 @@
+================================================================================
+Inf
+================================================================================
+
+##Inf
+
+--------------------------------------------------------------------------------
+
+(source
+  (sym_val_lit
+    (sym_lit
+      (sym_name))))
+
+================================================================================
+-Inf
+================================================================================
+
+##-Inf
+
+--------------------------------------------------------------------------------
+
+(source
+  (sym_val_lit
+    (sym_lit
+      (sym_name))))
+
+================================================================================
+NaN
+================================================================================
+
+##NaN
+
+--------------------------------------------------------------------------------
+
+(source
+  (sym_val_lit
+    (sym_lit
+      (sym_name))))

vendor/tree-sitter-clojure/corpus/syn_quoting_lit.txt

@@ -0,0 +1,30 @@
+================================================================================
+Syntax Quoted Symbol
+================================================================================
+
+`a-sym
+
+--------------------------------------------------------------------------------
+
+(source
+  (syn_quoting_lit
+    (sym_lit
+      (sym_name))))
+
+================================================================================
+Syntax Quoted List
+================================================================================
+
+`(+ ~a 1)
+
+--------------------------------------------------------------------------------
+
+(source
+  (syn_quoting_lit
+    (list_lit
+      (sym_lit
+        (sym_name))
+      (unquoting_lit
+        (sym_lit
+          (sym_name)))
+      (num_lit))))

vendor/tree-sitter-clojure/corpus/tagged_or_ctor_lit.txt

@@ -0,0 +1,47 @@
+================================================================================
+Tagged Literal
+================================================================================
+
+#uuid "00000000-0000-0000-0000-000000000000"
+
+--------------------------------------------------------------------------------
+
+(source
+  (tagged_or_ctor_lit
+    (sym_lit
+      (sym_name))
+    (str_lit)))
+
+================================================================================
+Constructor
+================================================================================
+
+#user.Fun [1 2]
+
+--------------------------------------------------------------------------------
+
+(source
+  (tagged_or_ctor_lit
+    (sym_lit
+      (sym_name))
+    (vec_lit
+      (num_lit)
+      (num_lit))))
+
+================================================================================
+Constructor Alternate
+================================================================================
+
+#user.Fun {:a 1 :b 2}
+
+--------------------------------------------------------------------------------
+
+(source
+  (tagged_or_ctor_lit
+    (sym_lit
+      (sym_name))
+    (map_lit
+      (kwd_lit)
+      (num_lit)
+      (kwd_lit)
+      (num_lit))))

vendor/tree-sitter-clojure/corpus/unquote_splicing_lit.txt

@@ -0,0 +1,81 @@
+================================================================================
+Unquote Splicing into List
+================================================================================
+
+`(+ ~@(list 2 3))
+
+--------------------------------------------------------------------------------
+
+(source
+  (syn_quoting_lit
+    (list_lit
+      (sym_lit
+        (sym_name))
+      (unquote_splicing_lit
+        (list_lit
+          (sym_lit
+            (sym_name))
+          (num_lit)
+          (num_lit))))))
+
+================================================================================
+Unquote Splicing into Vector
+================================================================================
+
+`[:a ~@(list :b :c)]
+
+--------------------------------------------------------------------------------
+
+(source
+  (syn_quoting_lit
+    (vec_lit
+      (kwd_lit)
+      (unquote_splicing_lit
+        (list_lit
+          (sym_lit
+            (sym_name))
+          (kwd_lit)
+          (kwd_lit))))))
+
+================================================================================
+Unquote Splicing into Set
+================================================================================
+
+`#{:i ~@(list :j :k)}
+
+--------------------------------------------------------------------------------
+
+(source
+  (syn_quoting_lit
+    (set_lit
+      (kwd_lit)
+      (unquote_splicing_lit
+        (list_lit
+          (sym_lit
+            (sym_name))
+          (kwd_lit)
+          (kwd_lit))))))
+
+================================================================================
+Unquote Splicing into Map
+================================================================================
+
+`{~@(list :a 1) ~@(list :b 2)}
+
+--------------------------------------------------------------------------------
+
+(source
+  (syn_quoting_lit
+    (map_lit
+      (unquote_splicing_lit
+        (list_lit
+          (sym_lit
+            (sym_name))
+          (kwd_lit)
+          (num_lit)))
+      (unquote_splicing_lit
+        (list_lit
+          (sym_lit
+            (sym_name))
+          (kwd_lit)
+          (num_lit))))))

vendor/tree-sitter-clojure/corpus/unquoting_lit.txt

@@ -0,0 +1,34 @@
+================================================================================
+Unquoting Symbol
+================================================================================
+
+`~a
+
+--------------------------------------------------------------------------------
+
+(source
+  (syn_quoting_lit
+    (unquoting_lit
+      (sym_lit
+        (sym_name)))))
+
+================================================================================
+Unquoting List
+================================================================================
+
+`(dec ~(+ 1 a))
+
+--------------------------------------------------------------------------------
+
+(source
+  (syn_quoting_lit
+    (list_lit
+      (sym_lit
+        (sym_name))
+      (unquoting_lit
+        (list_lit
+          (sym_lit
+            (sym_name))
+          (num_lit)
+          (sym_lit
+            (sym_name)))))))

vendor/tree-sitter-clojure/corpus/var_quoting_lit.txt

@@ -0,0 +1,33 @@
+================================================================================
+Var Quoting a Symbol
+================================================================================
+
+#'my-sym
+
+--------------------------------------------------------------------------------
+
+(source
+  (var_quoting_lit
+    (sym_lit
+      (sym_name))))
+
+================================================================================
+Var Quoting with Reader Conditional
+================================================================================
+
+#'#?(:clj my-sym :cljr your-sym :cljs their-sym)
+
+--------------------------------------------------------------------------------
+
+(source
+  (var_quoting_lit
+    (read_cond_lit
+      (kwd_lit)
+      (sym_lit
+        (sym_name))
+      (kwd_lit)
+      (sym_lit
+        (sym_name))
+      (kwd_lit)
+      (sym_lit
+        (sym_name)))))

vendor/tree-sitter-clojure/corpus/vec_lit.txt

@@ -0,0 +1,49 @@
+================================================================================
+Empty Vector
+================================================================================
+
+[]
+
+--------------------------------------------------------------------------------
+
+(source
+  (vec_lit))
+
+================================================================================
+Vector with Numbers
+================================================================================
+
+[1 1 2 3 5 8]
+
+--------------------------------------------------------------------------------
+
+(source
+  (vec_lit
+    (num_lit)
+    (num_lit)
+    (num_lit)
+    (num_lit)
+    (num_lit)
+    (num_lit)))
+
+================================================================================
+Vector with Different Types
+================================================================================
+
+[:a 1 'fun {:x 1 :y 2} #{}]
+
+--------------------------------------------------------------------------------
+
+(source
+  (vec_lit
+    (kwd_lit)
+    (num_lit)
+    (quoting_lit
+      (sym_lit
+        (sym_name)))
+    (map_lit
+      (kwd_lit)
+      (num_lit)
+      (kwd_lit)
+      (num_lit))
+    (set_lit)))

vendor/tree-sitter-clojure/grammar.js

@@ -279,7 +279,10 @@ module.exports = grammar({
 
     sym_lit: $ =>
       seq(repeat($._metadata_lit),
-          SYMBOL),
+          $.sym_name),
+
+    sym_name: $ =>
+      SYMBOL,
 
     _metadata_lit: $ =>
       seq(choice(field('meta', $.meta_lit),
@@ -350,6 +353,7 @@ module.exports = grammar({
           field('marker', "#"),
           $._bare_list_lit),
 
+    // XXX: likely has similar issue as sym_lit
     regex_lit: $ =>
       seq(field('marker', "#"),
           STRING),

vendor/tree-sitter-clojure/package-lock.json

@@ -14,11 +14,6 @@
       "resolved": "https://registry.npmjs.org/tree-sitter-cli/-/tree-sitter-cli-0.19.3.tgz",
       "integrity": "sha512-UlntGxLrlkQCKVrhm7guzfi+ovM4wDLVCCu3z5jmfDgFNoUoKa/23ddaQON5afD5jB9a02xv4N5MXJfCx+/mpw==",
       "dev": true
-    },
-    "web-tree-sitter": {
-      "version": "0.19.1",
-      "resolved": "https://registry.npmjs.org/web-tree-sitter/-/web-tree-sitter-0.19.1.tgz",
-      "integrity": "sha512-Wlveh+zdegmNdK733B18pf+NmliKs2t5+Aid8IOFIBV2MqJmnYVo3AdukbdZJ+iIxzBnIreYFKfcFFCWVEf4AA=="
     }
   }
 }

vendor/tree-sitter-clojure/package.json

@@ -10,8 +10,7 @@
   "author": "",
   "license": "",
   "dependencies": {
-    "nan": "2.14.2",
-    "web-tree-sitter": "0.19.1"
+    "nan": "2.14.2"
   },
   "devDependencies": {
     "tree-sitter-cli": "0.19.3"

vendor/tree-sitter-clojure/queries/highlights.scm

@@ -0,0 +1,29 @@
+;; Literals
+
+(num_lit) @number
+
+[
+  (char_lit)
+  (str_lit)
+] @string
+
+[
+ (bool_lit)
+ (nil_lit)
+] @constant.builtin
+
+(kwd_lit) @constant
+
+;; Comments
+
+(comment) @comment
+
+;; Treat quasiquotation as operators for the purpose of highlighting.
+
+[
+ "'"
+ "`"
+ "~"
+ "@"
+ "~@"
+] @operator

vendor/tree-sitter-clojure/src/grammar.json

@@ -723,35 +723,39 @@
           }
         },
         {
-          "type": "TOKEN",
-          "content": {
-            "type": "SEQ",
-            "members": [
-              {
-                "type": "PATTERN",
-                "value": "[^\\f\\n\\r\\t ()\\[\\]{}\"@~^;`\\\\,:#'0-9\\u000B\\u001C\\u001D\\u001E\\u001F\\u2028\\u2029\\u1680\\u2000\\u2001\\u2002\\u2003\\u2004\\u2005\\u2006\\u2008\\u2009\\u200a\\u205f\\u3000]"
-              },
-              {
-                "type": "REPEAT",
-                "content": {
-                  "type": "CHOICE",
-                  "members": [
-                    {
-                      "type": "PATTERN",
-                      "value": "[^\\f\\n\\r\\t ()\\[\\]{}\"@~^;`\\\\,:#'0-9\\u000B\\u001C\\u001D\\u001E\\u001F\\u2028\\u2029\\u1680\\u2000\\u2001\\u2002\\u2003\\u2004\\u2005\\u2006\\u2008\\u2009\\u200a\\u205f\\u3000]"
-                    },
-                    {
-                      "type": "PATTERN",
-                      "value": "[:#'0-9]"
-                    }
-                  ]
-                }
-              }
-            ]
-          }
+          "type": "SYMBOL",
+          "name": "sym_name"
         }
       ]
     },
+    "sym_name": {
+      "type": "TOKEN",
+      "content": {
+        "type": "SEQ",
+        "members": [
+          {
+            "type": "PATTERN",
+            "value": "[^\\f\\n\\r\\t ()\\[\\]{}\"@~^;`\\\\,:#'0-9\\u000B\\u001C\\u001D\\u001E\\u001F\\u2028\\u2029\\u1680\\u2000\\u2001\\u2002\\u2003\\u2004\\u2005\\u2006\\u2008\\u2009\\u200a\\u205f\\u3000]"
+          },
+          {
+            "type": "REPEAT",
+            "content": {
+              "type": "CHOICE",
+              "members": [
+                {
+                  "type": "PATTERN",
+                  "value": "[^\\f\\n\\r\\t ()\\[\\]{}\"@~^;`\\\\,:#'0-9\\u000B\\u001C\\u001D\\u001E\\u001F\\u2028\\u2029\\u1680\\u2000\\u2001\\u2002\\u2003\\u2004\\u2005\\u2006\\u2008\\u2009\\u200a\\u205f\\u3000]"
+                },
+                {
+                  "type": "PATTERN",
+                  "value": "[:#'0-9]"
+                }
+              ]
+            }
+          }
+        ]
+      }
+    },
     "_metadata_lit": {
       "type": "SEQ",
       "members": [

vendor/tree-sitter-clojure/src/node-types.json

@@ -2020,7 +2020,7 @@
     },
     "children": {
       "multiple": true,
-      "required": false,
+      "required": true,
       "types": [
         {
           "type": "comment",
@@ -2029,6 +2029,10 @@
         {
           "type": "dis_expr",
           "named": true
+        },
+        {
+          "type": "sym_name",
+          "named": true
         }
       ]
     }
@@ -3121,6 +3125,10 @@
     "type": "num_lit",
     "named": true
   },
+  {
+    "type": "sym_name",
+    "named": true
+  },
   {
     "type": "{",
     "named": false