]> git.eshelyaron.com Git - emacs.git/commitdiff
Add contextual tree-sitter font-lock to ts-mode and js-mode
authorYuan Fu <casouri@gmail.com>
Thu, 3 Nov 2022 18:53:49 +0000 (11:53 -0700)
committerYuan Fu <casouri@gmail.com>
Thu, 3 Nov 2022 18:53:49 +0000 (11:53 -0700)
* lisp/progmodes/js.el (js--treesit-font-lock-settings)
* lisp/progmodes/ts-mode.el (ts-mode--font-lock-settings): Capture
commend and strings.  Add empty lines.

lisp/progmodes/js.el
lisp/progmodes/ts-mode.el

index 92a8599d7f2a08ce6d7365d0bb7a549b494a8c51..01da87f6be593960e8cbc5f28542f0335465b4c9 100644 (file)
@@ -3451,10 +3451,13 @@ This function is intended for use in `after-change-functions'."
 
 (defvar js--treesit-font-lock-settings
   (treesit-font-lock-rules
+
    :language 'javascript
    :override t
    :feature 'comment
-   `((comment) @font-lock-comment-face)
+   `((comment) @font-lock-comment-face
+     (comment) @contextual)
+
    :language 'javascript
    :override t
    :feature 'constant
@@ -3463,18 +3466,23 @@ This function is intended for use in `after-change-functions'."
 
      [(true) (false) (null)] @font-lock-constant-face
      (number) @font-lock-constant-face)
+
    :language 'javascript
    :override t
    :feature 'keyword
    `([,@js--treesit-keywords] @font-lock-keyword-face
      [(this) (super)] @font-lock-keyword-face)
+
    :language 'javascript
    :override t
    :feature 'string
    `((regex pattern: (regex_pattern)) @font-lock-string-face
      (string) @font-lock-string-face
+     (string) @contextual
      (template_string) @js--fontify-template-string
+     (template_string) @contextual
      (template_substitution ["${" "}"] @font-lock-builtin-face))
+
    :language 'javascript
    :override t
    :feature 'declaration
@@ -3503,6 +3511,7 @@ This function is intended for use in `after-change-functions'."
              (identifier)
              @font-lock-function-name-face)
       value: (array (number) (function))))
+
    :language 'javascript
    :override t
    :feature 'identifier
@@ -3514,6 +3523,7 @@ This function is intended for use in `after-change-functions'."
 
      (arrow_function
       parameter: (identifier) @font-lock-variable-name-face))
+
    :language 'javascript
    :override t
    :feature 'expression
@@ -3533,6 +3543,7 @@ This function is intended for use in `after-change-functions'."
       left: [(identifier) @font-lock-variable-name-face
              (member_expression
               property: (property_identifier) @font-lock-variable-name-face)]))
+
    :language 'javascript
    :override t
    :feature 'property
@@ -3547,11 +3558,13 @@ This function is intended for use in `after-change-functions'."
      ((shorthand_property_identifier) @font-lock-variable-name-face)
 
      ((shorthand_property_identifier_pattern) @font-lock-variable-name-face))
+
    :language 'javascript
    :override t
    :feature 'pattern
    `((pair_pattern key: (property_identifier) @font-lock-variable-name-face)
      (array_pattern (identifier) @font-lock-variable-name-face))
+
    :language 'javascript
    :override t
    :feature 'jsx
index 20118bc3db9085500152608b0f4ea9289093ad27..a7dee1ead8814c06194e928b62c73d240d22f5da 100644 (file)
 
 (defvar ts-mode--font-lock-settings
   (treesit-font-lock-rules
+
    :language 'tsx
    :override t
    :feature 'comment
-   `((comment) @font-lock-comment-face)
+   `((comment) @font-lock-comment-face
+     (comment) @contextual)
+
    :language 'tsx
    :override t
    :feature 'constant
 
      [(true) (false) (null)] @font-lock-constant-face
      (number) @font-lock-constant-face)
+
    :language 'tsx
    :override t
    :feature 'keyword
    `([,@ts-mode--keywords] @font-lock-keyword-face
      [(this) (super)] @font-lock-keyword-face)
+
    :language 'tsx
    :override t
    :feature 'string
    `((regex pattern: (regex_pattern)) @font-lock-string-face
      (string) @font-lock-string-face
+     (string) @contextual
      (template_string) @js--fontify-template-string
+     (template_string) @contextual
      (template_substitution ["${" "}"] @font-lock-builtin-face))
+
    :language 'tsx
    :override t
    :feature 'declaration
              (identifier)
              (identifier) @font-lock-function-name-face)
       value: (array (number) (function))))
+
    :language 'tsx
    :override t
    :feature 'identifier
       [(_ (identifier) @font-lock-variable-name-face)
        (_ (_ (identifier) @font-lock-variable-name-face))
        (_ (_ (_ (identifier) @font-lock-variable-name-face)))]))
+
    :language 'tsx
    :override t
    :feature 'expression
       [(identifier) @font-lock-function-name-face
        (member_expression
         property: (property_identifier) @font-lock-function-name-face)]))
+
    :language 'tsx
    :override t
    :feature 'property
 
      ((shorthand_property_identifier_pattern)
       @font-lock-variable-name-face))
+
    :language 'tsx
    :override t
    :feature 'pattern
       key: (property_identifier) @font-lock-variable-name-face)
 
      (array_pattern (identifier) @font-lock-variable-name-face))
+
    :language 'tsx
    :override t
    :feature 'jsx