(use apropos parley-auto-completion)

(completion-choices
 (lambda (input position last-word)
   (map symbol->string (apropos-list last-word))))

(word-class '(: (? (* any) whitespace) ($ (+ (~ "()[]")))))

(add-key-binding! #\tab auto-completion-handler)