cl-user> (make-package 'a :use '())
#<Package "A">
cl-user> (import 'a::hello)
t
cl-user> (handler-bind ((error (lambda (condition) (let ((*package* (find-package :cl))) (terpri) (princ condition) (terpri)) (invoke-restart 'ignore))))
           (restart-case hello   (ignore (&rest args) (print args) nil))
           (restart-case (hello) (ignore (&rest args) (print args) nil)))

;Compiler warnings :
;   In an anonymous lambda form: Undeclared free variable hello
;   In an anonymous lambda form: Undefined function hello

Unbound variable: a::hello

nil
Undefined function a::hello called with arguments () .

nil
nil
cl-user>