@sshadows/tree-sitter-al 3.2.0 → 3.3.0

package/queries/indents.scm

@@ -1,10 +1,8 @@
 ; AL Language (v2) - Tree-sitter Indentation Queries
 ; Compatible with Neovim (nvim-treesitter) and Helix editor
-
 ; =============================================================================
 ; Indent Begin - nodes that increase indentation
 ; =============================================================================
-
 ; Object declarations (all use { ... })
 [
   (table_declaration)
@@ -172,23 +170,25 @@
 
 ; Argument and parameter lists
 (argument_list) @indent.begin
+
 (parameter_list) @indent.begin
 
 ; =============================================================================
 ; Indent End - tokens that signal end of indentation
 ; =============================================================================
-
 "}" @indent.end
+
 ")" @indent.end
+
 "]" @indent.end
 
 ; Code block begin/end tokens (at depth 0 — named nodes)
-(code_block (end_keyword) @indent.end)
+(code_block
+  (end_keyword) @indent.end)
 
 ; =============================================================================
 ; Indent Branch - closing tokens that should dedent to match their opener
 ; =============================================================================
-
 [
   "}"
   ")"

package/queries/locals.scm

@@ -1,10 +1,8 @@
 ; AL Language (v2) - Tree-sitter Scope and Local Variable Tracking
 ; See: https://tree-sitter.github.io/tree-sitter/syntax-highlighting#local-variables
-
 ; =============================================================================
 ; Scope Definitions
 ; =============================================================================
-
 ; Object declarations create scopes
 [
   (table_declaration)
@@ -31,9 +29,13 @@
 
 ; Procedures and triggers create scopes
 (procedure) @local.scope
+
 (trigger_declaration) @local.scope
+
 (event_declaration) @local.scope
+
 (interface_procedure) @local.scope
+
 (preproc_split_procedure) @local.scope
 
 ; Code blocks create scopes
@@ -41,37 +43,48 @@
 
 ; Control flow statements with bodies create scopes
 (if_statement) @local.scope
+
 (case_statement) @local.scope
+
 (case_branch) @local.scope
+
 (for_statement) @local.scope
+
 (foreach_statement) @local.scope
+
 (while_statement) @local.scope
+
 (repeat_statement) @local.scope
+
 (with_statement) @local.scope
 
 ; =============================================================================
 ; Local Definitions
 ; =============================================================================
-
 ; Variable declarations define local variables
 (variable_declaration
   name: (identifier) @local.definition)
+
 (variable_declaration
   name: (quoted_identifier) @local.definition)
 
 ; Parameters define local variables
 (parameter
   name: (identifier) @local.definition)
+
 (parameter
   name: (quoted_identifier) @local.definition)
 
 ; Return values define local variables
 (procedure
   return_value: (identifier) @local.definition)
+
 (procedure
   return_value: (quoted_identifier) @local.definition)
+
 (trigger_declaration
   return_value: (identifier) @local.definition)
+
 (trigger_declaration
   return_value: (quoted_identifier) @local.definition)
 
@@ -81,15 +94,24 @@
 
 ; Field declarations (in tables)
 (field_declaration
-  name: [(identifier) (quoted_identifier)] @local.definition)
+  name: [
+    (identifier)
+    (quoted_identifier)
+  ] @local.definition)
 
 ; Enum value declarations
 (enum_value_declaration
-  value_name: [(identifier) (quoted_identifier)] @local.definition)
+  value_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @local.definition)
 
 ; Key declarations
 (key_declaration
-  name: [(identifier) (quoted_identifier)] @local.definition)
+  name: [
+    (identifier)
+    (quoted_identifier)
+  ] @local.definition)
 
 ; For loop variables
 (for_statement
@@ -102,7 +124,6 @@
 ; =============================================================================
 ; References
 ; =============================================================================
-
 ; Identifiers are references
 (identifier) @local.reference
 

package/queries/tags.scm

@@ -1,122 +1,192 @@
 ; AL Language (v2) - Tree-sitter Tags for Code Navigation
 ; See: https://tree-sitter.github.io/tree-sitter/4-code-navigation.html
-
 ; =============================================================================
 ; Object Definitions
 ; =============================================================================
-
 (table_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 (page_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 (codeunit_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 (report_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 (query_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 (xmlport_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 (enum_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 (interface_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.interface
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.interface
 
 (controladdin_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 ; =============================================================================
 ; Extension Definitions
 ; =============================================================================
-
 (tableextension_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 (pageextension_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 (enumextension_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 (reportextension_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 (profileextension_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 (permissionsetextension_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 ; =============================================================================
 ; Other Object Types
 ; =============================================================================
-
 (profile_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 (permissionset_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 (entitlement_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 (pagecustomization_declaration
-  object_name: [(identifier) (quoted_identifier)] @name) @definition.class
+  object_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.class
 
 ; =============================================================================
 ; Procedure and Trigger Definitions
 ; =============================================================================
-
 ; Procedure definitions
 (procedure
-  name: [(identifier) (quoted_identifier)] @name) @definition.method
+  name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.method
 
 ; Event declarations
 (event_declaration
-  name: [(identifier) (quoted_identifier)] @name) @definition.method
+  name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.method
 
 ; Trigger declarations
 (trigger_declaration
-  name: [(identifier) (quoted_identifier)] @name) @definition.method
+  name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.method
+
 ; Scoped member-trigger name (`Object::Member`) — tag on the member
 (trigger_declaration
   name: (member_trigger_name
-    member: [(identifier) (quoted_identifier)] @name)) @definition.method
+    member: [
+      (identifier)
+      (quoted_identifier)
+    ] @name)) @definition.method
 
 ; Interface procedures
 (interface_procedure
-  name: [(identifier) (quoted_identifier)] @name) @definition.method
+  name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.method
 
 ; Split procedures (preprocessor-split)
 (preproc_split_procedure
-  name: [(identifier) (quoted_identifier)] @name) @definition.method
+  name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.method
 
 ; =============================================================================
 ; Test Definitions (for test runners like neotest)
 ; =============================================================================
-
 ; [Test] as first attribute, 0+ trailing attributes before procedure
-(
-  (attribute_item
-    (attribute_content
-      name: (identifier) @_test_attr
-      (#match? @_test_attr "^[Tt][Ee][Ss][Tt]$")))
+((attribute_item
+  (attribute_content
+    name: (identifier) @_test_attr
+    (#match? @_test_attr "^[Tt][Ee][Ss][Tt]$")))
   (attribute_item)*
   .
   (procedure
-    name: [(identifier) (quoted_identifier)] @test.name) @test.definition
-)
+    name: [
+      (identifier)
+      (quoted_identifier)
+    ] @test.name) @test.definition)
 
 ; [Test] after 1+ other attributes (e.g. [Obsolete][Test][Scope] procedure)
-(
-  (attribute_item)
+((attribute_item)
   .
   (attribute_item
     (attribute_content
@@ -125,13 +195,14 @@
   (attribute_item)*
   .
   (procedure
-    name: [(identifier) (quoted_identifier)] @test.name) @test.definition
-)
+    name: [
+      (identifier)
+      (quoted_identifier)
+    ] @test.name) @test.definition)
 
 ; =============================================================================
 ; Parameter Definitions
 ; =============================================================================
-
 (parameter
   name: (identifier) @name) @definition.parameter
 
@@ -141,27 +212,37 @@
 ; =============================================================================
 ; Field Definitions
 ; =============================================================================
-
 ; Table field definitions
 (field_declaration
-  name: [(identifier) (quoted_identifier)] @name) @definition.field
+  name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.field
 
 ; Enum value definitions
 (enum_value_declaration
-  value_name: [(identifier) (quoted_identifier)] @name) @definition.constant
+  value_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.constant
 
 ; Key definitions
 (key_declaration
-  name: [(identifier) (quoted_identifier)] @name) @definition.field
+  name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.field
 
 ; Fieldgroup definitions
 (fieldgroup_declaration
-  name: [(identifier) (quoted_identifier)] @name) @definition.field
+  name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.field
 
 ; =============================================================================
 ; Variable and Label Definitions
 ; =============================================================================
-
 ; Variable declarations
 (variable_declaration
   name: (identifier) @name) @definition.variable
@@ -183,40 +264,54 @@
 ; =============================================================================
 ; Action Definitions
 ; =============================================================================
-
 (action_declaration
-  name: [(identifier) (quoted_identifier)] @name) @definition.function
+  name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.function
 
 (customaction_declaration
-  name: [(identifier) (quoted_identifier)] @name) @definition.function
+  name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.function
 
 (systemaction_declaration
-  name: [(identifier) (quoted_identifier)] @name) @definition.function
+  name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.function
 
 (fileuploadaction_declaration
-  name: [(identifier) (quoted_identifier)] @name) @definition.function
+  name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.function
 
 (actionref_declaration
-  action_name: [(identifier) (quoted_identifier)] @name) @definition.function
+  action_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.function
 
 ; =============================================================================
 ; Module/Namespace Definitions
 ; =============================================================================
-
 (namespace_declaration
   name: (namespace_name) @name) @definition.module
 
 ; =============================================================================
 ; View Definitions
 ; =============================================================================
-
 (view_definition
-  name: [(identifier) (quoted_identifier)] @name) @definition.field
+  name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @definition.field
 
 ; =============================================================================
 ; Function/Method References
 ; =============================================================================
-
 ; Direct function calls
 (call_expression
   function: (identifier) @name) @reference.call
@@ -229,32 +324,48 @@
 ; =============================================================================
 ; Type References
 ; =============================================================================
-
 ; Record type references
 (record_type
-  reference: [(identifier) (quoted_identifier)] @name) @reference.type
+  reference: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @reference.type
 
 ; Object reference type references
 (object_reference_type
-  reference: [(identifier) (quoted_identifier) (integer)] @name) @reference.type
+  reference: [
+    (identifier)
+    (quoted_identifier)
+    (integer)
+  ] @name) @reference.type
 
 ; Database references
 (database_reference
-  table_name: [(identifier) (quoted_identifier)] @name) @reference.class
+  table_name: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @reference.class
 
 ; =============================================================================
 ; Interface References
 ; =============================================================================
-
 (implements_clause
-  interface: [(identifier) (quoted_identifier)] @name) @reference.implementation
+  interface: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @reference.implementation
 
 ; =============================================================================
 ; Enum Value References
 ; =============================================================================
-
 (qualified_enum_value
-  enum_type: [(identifier) (quoted_identifier)] @name) @reference.class
+  enum_type: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @reference.class
 
 (qualified_enum_value
-  value: [(identifier) (quoted_identifier)] @name) @reference.constant
+  value: [
+    (identifier)
+    (quoted_identifier)
+  ] @name) @reference.constant