helix-plus/runtime/queries/haskell/textobjects.scm

(comment) @comment.inside

[
  (adt)
  (type_alias)
  (newtype)
] @class.around

((signature)? (function rhs:(_) @function.inside)) @function.around 
(exp_lambda) @function.around

(adt (type_variable) @parameter.inside)
(patterns (_) @parameter.inside)
Add Haskell text objects (#5061) 2 years ago			`(comment) @comment.inside`

			`[`
			`(adt)`
Update tree-sitter-haskell (#6317) 2 years ago			`(type_alias)`
Add Haskell text objects (#5061) 2 years ago			`(newtype)`
			`] @class.around`

			`((signature)? (function rhs:(_) @function.inside)) @function.around`
			`(exp_lambda) @function.around`

			`(adt (type_variable) @parameter.inside)`
			`(patterns (_) @parameter.inside)`