;; -*- mode: lisp-data -*-

(fset 'test-fun (lambda (x)
                  (error (list x))))

(test-fun "hi")