macro `signals-error` doesn't always catch errors
Form: (SIGNALS-ERROR (COMPLEMENT #'NOT T) PROGRAM-ERROR)
Expected value:
T
Actual value:
#<a UNDEFINED-FUNCTION> [The function NIL is undefined.]
Form: (SIGNALS-ERROR (COMPLEMENT #'NOT T) PROGRAM-ERROR)
Expected value:
T
Actual value:
#<a UNDEFINED-FUNCTION> [The function NIL is undefined.]