X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fpcl%2Flow.lisp;h=e9539ec4183ef0409967a5bf70ebd19feb455f7f;hb=d147d512602d761a2dcdfded506dd1a8f9a140dc;hp=f09eba4c376374f5c1cf5aab17adf7405392c213;hpb=cbaa1997bb097a55d108df592ac3b7eb4a703fff;p=sbcl.git

diff --git a/src/pcl/low.lisp b/src/pcl/low.lisp
index f09eba4..e9539ec 100644
--- a/src/pcl/low.lisp
+++ b/src/pcl/low.lisp
@@ -206,7 +206,7 @@
 (defmacro get-wrapper (inst)
   (once-only ((wrapper `(wrapper-of ,inst)))
     `(progn
-       (assert (typep ,wrapper 'wrapper) () "What kind of instance is this?")
+       (aver (typep ,wrapper 'wrapper))
        ,wrapper)))
 
 ;;; FIXME: could be an inline function (like many other things around