Author: ehuelsmann Date: Tue Oct 21 10:02:22 2008 New Revision: 438 Log: Backport c437: Make UNSUPPORTED evaluate to a CERROR, for REPL users. Modified: usocket/branches/0.4.x/condition.lisp Modified: usocket/branches/0.4.x/condition.lisp ============================================================================== --- usocket/branches/0.4.x/condition.lisp (original) +++ usocket/branches/0.4.x/condition.lisp Tue Oct 21 10:02:22 2008 @@ -193,7 +193,7 @@ (defmacro unsupported (feature context &key minimum) - `(signal 'unsupported :feature ,feature + `(cerror 'unsupported :feature ,feature :context ,context :minimum ,minimum)) (defmacro unimplemented (feature context)