pulsar-edit/pulsar
1
1
Fork 0
mirror of https://github.com/pulsar-edit/pulsar.git synced 2024-10-26 11:08:40 +03:00
Code Issues Packages Projects Releases Wiki Activity

Fixed some grammar rules for unquote in Clojure

Browse Source
This commit is contained in:
Maurício Szabo 2023-09-20 21:38:03 -03:00
parent d5664d19c0
commit 1a7719adad
4 changed files with 19 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
packages/language-clojure/grammars/ts/edn-highlights.scm
View File

@ -24,7 +24,15 @@
((regex_lit) @string.regexp (#is-not? test.descendantOfNodeWithData "clojure.dismissTag"))
((sym_lit) @meta.symbol (#is-not? test.descendantOfNodeWithData "clojure.dismissTag"))
((kwd_lit) @constant.keyword (#is-not? test.descendantOfNodeWithData "clojure.dismissTag"))
((str_lit) @string.quoted.double (#is-not? test.descendantOfNodeWithData "clojure.dismissTag"))
(str_lit
"\"" @punctuation.definition.string.begin.clojure
(#is-not? test.descendantOfNodeWithData "clojure.dismissTag")
(#is? test.first))
(str_lit
"\"" @punctuation.definition.string.end.clojure
(#is-not? test.descendantOfNodeWithData "clojure.dismissTag")
(#is? test.last))
((str_content) @string.quoted.double (#is-not? test.descendantOfNodeWithData "clojure.dismissTag"))
((num_lit) @constant.numeric (#is-not? test.descendantOfNodeWithData "clojure.dismissTag"))
((nil_lit) @constant.language (#is-not? test.descendantOfNodeWithData "clojure.dismissTag"))
((bool_lit) @constant.language (#is-not? test.descendantOfNodeWithData clojure.dismissTag))

BIN
packages/language-clojure/grammars/ts/grammar.wasm
View File

Binary file not shown.

8
packages/language-clojure/grammars/ts/highlights.scm
View File

@ -142,6 +142,14 @@
((regex_lit) @string.regexp (#is-not? test.descendantOfNodeWithData "clojure.dismissTag"))
((sym_lit) @meta.symbol (#is-not? test.descendantOfNodeWithData "clojure.dismissTag"))
((kwd_lit) @constant.keyword (#is-not? test.descendantOfNodeWithData "clojure.dismissTag"))
(str_lit
"\"" @punctuation.definition.string.begin.clojure
(#is-not? test.descendantOfNodeWithData "clojure.dismissTag")
(#is? test.first))
(str_lit
"\"" @punctuation.definition.string.end.clojure
(#is-not? test.descendantOfNodeWithData "clojure.dismissTag")
(#is? test.last))
((str_lit) @string.quoted.double (#is-not? test.descendantOfNodeWithData "clojure.dismissTag"))
((num_lit) @constant.numeric (#is-not? test.descendantOfNodeWithData "clojure.dismissTag"))
((nil_lit) @constant.language (#is-not? test.descendantOfNodeWithData "clojure.dismissTag"))

2
packages/language-clojure/spec/fixtures/tokens.clj vendored
View File

@ -37,7 +37,9 @@
(def a "A STRING")
; <- keyword.control
; ^ entity.global
; ^ punctuation.definition.string.begin
; ^ string.quoted.double
; ^ punctuation.definition.string.end
#{'foo}
; <- punctuation.section.set.begin