nvim-treesitter/runtime/queries/pascal/locals.scm

(root) @local.scope

(defProc) @local.scope

(lambda) @local.scope

(interface
  (declProc) @local.scope)

(declSection
  (declProc) @local.scope)

(declClass
  (declProc) @local.scope)

(declHelper
  (declProc) @local.scope)

(declProcRef) @local.scope

(exceptionHandler) @local.scope

(exceptionHandler
  variable: (identifier) @local.definition)

(declArg
  name: (identifier) @local.definition)

(declVar
  name: (identifier) @local.definition)

(declConst
  name: (identifier) @local.definition)

(declLabel
  name: (identifier) @local.definition)

(genericArg
  name: (identifier) @local.definition)

(declEnumValue
  name: (identifier) @local.definition)

(declType
  name: (identifier) @local.definition)

(declType
  name: (genericTpl
    entity: (identifier) @local.definition))

(declProc
  name: (identifier) @local.definition)

(identifier) @local.reference