@sshadows/tree-sitter-al 3.2.0 → 3.3.0

package/queries/textobjects.scm

@@ -9,11 +9,9 @@
 ;
 ; Note: the `body` field is absent for an empty construct (`{ }` / `begin end`),
 ; so an empty body simply yields no `.inside` match — the correct behaviour.
-
 ; =============================================================================
 ; Objects / types  ->  class.inside / class.around
 ; =============================================================================
-
 [
   (table_declaration)
   (tableextension_declaration)
@@ -34,49 +32,91 @@
   (permissionsetextension_declaration)
 ] @class.around
 
-(table_declaration body: (_) @class.inside)
-(tableextension_declaration body: (_) @class.inside)
-(page_declaration body: (_) @class.inside)
-(pageextension_declaration body: (_) @class.inside)
-(pagecustomization_declaration body: (_) @class.inside)
-(codeunit_declaration body: (_) @class.inside)
-(report_declaration body: (_) @class.inside)
-(reportextension_declaration body: (_) @class.inside)
-(query_declaration body: (_) @class.inside)
-(xmlport_declaration body: (_) @class.inside)
-(enum_declaration body: (_) @class.inside)
-(enumextension_declaration body: (_) @class.inside)
-(interface_declaration body: (_) @class.inside)
-(controladdin_declaration body: (_) @class.inside)
-(dotnet_declaration body: (_) @class.inside)
-(permissionset_declaration body: (_) @class.inside)
-(permissionsetextension_declaration body: (_) @class.inside)
+(table_declaration
+  body: (_) @class.inside)
+
+(tableextension_declaration
+  body: (_) @class.inside)
+
+(page_declaration
+  body: (_) @class.inside)
+
+(pageextension_declaration
+  body: (_) @class.inside)
+
+(pagecustomization_declaration
+  body: (_) @class.inside)
+
+(codeunit_declaration
+  body: (_) @class.inside)
+
+(report_declaration
+  body: (_) @class.inside)
+
+(reportextension_declaration
+  body: (_) @class.inside)
+
+(query_declaration
+  body: (_) @class.inside)
+
+(xmlport_declaration
+  body: (_) @class.inside)
+
+(enum_declaration
+  body: (_) @class.inside)
+
+(enumextension_declaration
+  body: (_) @class.inside)
+
+(interface_declaration
+  body: (_) @class.inside)
+
+(controladdin_declaration
+  body: (_) @class.inside)
+
+(dotnet_declaration
+  body: (_) @class.inside)
+
+(permissionset_declaration
+  body: (_) @class.inside)
+
+(permissionsetextension_declaration
+  body: (_) @class.inside)
 
 ; =============================================================================
 ; Procedures / triggers  ->  function.inside / function.around
 ; (code blocks keep begin/end inside the body node, Rust `block` model)
 ; =============================================================================
-
 (procedure) @function.around
+
 (trigger_declaration) @function.around
+
 (interface_procedure) @function.around
 
 ; Inside = the statement run only (excludes begin/end). The code_block now nests
 ; a content-only statement_block (no delimiters); target it for a clean inside.
-(procedure body: (code_block body: (statement_block) @function.inside))
-(trigger_declaration body: (code_block body: (statement_block) @function.inside))
+(procedure
+  body: (code_block
+    body: (statement_block) @function.inside))
+
+(trigger_declaration
+  body: (code_block
+    body: (statement_block) @function.inside))
 
 ; Parameters — each parameter selectable individually
 (parameter) @parameter.inside
+
 (parameter) @parameter.around
 
 ; =============================================================================
 ; Statement containers (loops / case)  ->  block.inside / function.inside
 ; repeat/while/for/foreach/with bodies and the case branch list.
 ; =============================================================================
+(repeat_statement
+  body: (statement_block) @function.inside)
 
-(repeat_statement body: (statement_block) @function.inside)
-(case_statement body: (case_body) @block.inside)
+(case_statement
+  body: (case_body) @block.inside)
 
 ; =============================================================================
 ; Sections, fields, actions, var, loops  ->  generic body capture
@@ -85,14 +125,14 @@
 ; case_body, statement_block, …), so any new body-bearing construct works
 ; without editing this query.
 ; =============================================================================
-
-(_ body: (_) @block.inside) @block.around
+(_
+  body: (_) @block.inside) @block.around
 
 ; =============================================================================
 ; Comments
 ; =============================================================================
-
 (comment) @comment.inside
+
 (multiline_comment) @comment.inside
 
 [

package/src/grammar.json

@@ -15559,6 +15559,14 @@
       "type": "PATTERN",
       "value": "(?i)#[ \\t]*endregion[^\\n\\r]*"
     },
+    "preproc_define": {
+      "type": "PATTERN",
+      "value": "(?i)#[ \\t]*define[^\\n\\r]*"
+    },
+    "preproc_undef": {
+      "type": "PATTERN",
+      "value": "(?i)#[ \\t]*undef[^\\n\\r]*"
+    },
     "_statement": {
       "type": "PREC_RIGHT",
       "value": 0,
@@ -19606,6 +19614,14 @@
       "type": "SYMBOL",
       "name": "preproc_endregion"
     },
+    {
+      "type": "SYMBOL",
+      "name": "preproc_define"
+    },
+    {
+      "type": "SYMBOL",
+      "name": "preproc_undef"
+    },
     {
       "type": "PATTERN",
       "value": "\\uFEFF"

package/src/node-types.json

@@ -25271,6 +25271,11 @@
     "type": "preproc_close",
     "named": true
   },
+  {
+    "type": "preproc_define",
+    "named": true,
+    "extra": true
+  },
   {
     "type": "preproc_endregion",
     "named": true,
@@ -25293,6 +25298,11 @@
     "type": "preproc_split_end",
     "named": true
   },
+  {
+    "type": "preproc_undef",
+    "named": true,
+    "extra": true
+  },
   {
     "type": "procedure_keyword",
     "named": true