evil-textobj-tree-sitter-get-textobj generate invalid code with multiple bidings

[tampix]

How to reproduce

Take the example in the README :

(macroexpand '(evil-textobj-tree-sitter-get-textobj ("conditional.inner" "loop.inner")))

This will generate code looking like :

		     (if
		      (not
		       (eq range nil))
		      (evil-range
		       (car range)
		       (cdr range))
		      (message
		       (concat "No '"
			       ("conditional.inner" "loop.inner")
			       "' text object found"))))))

Which leads to this error when byte-compiling :

Warning: ‘"conditional.outer"’ is a malformed function