diff options
| -rw-r--r-- | testiere.lisp | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/testiere.lisp b/testiere.lisp index 3963351..8e1d40f 100644 --- a/testiere.lisp +++ b/testiere.lisp @@ -16,7 +16,8 @@ (condition (c) (declare (ignore c)) nil)))) ((list* :program function-name args) - `(funcall ',function-name ,@args)) + `(when (fboundp ',function-name) + (funcall ',function-name ,@args))) ((list* :with-stubs redefs more-specs) (let* ((assoc-vars |