X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler%2Fglobaldb.lisp;h=844bfa928c984398a0fed2772cac7c74f8353373;hb=b19093fa94d6e1785abee99c35c9a610e8777671;hp=f99f6e67924a97c3c6dc583988706c418921b11d;hpb=cbaa1997bb097a55d108df592ac3b7eb4a703fff;p=sbcl.git

diff --git a/src/compiler/globaldb.lisp b/src/compiler/globaldb.lisp
index f99f6e6..844bfa9 100644
--- a/src/compiler/globaldb.lisp
+++ b/src/compiler/globaldb.lisp
@@ -637,7 +637,7 @@
 		    (setf (svref table probe) name)
 		    (setf (aref index probe) entries-idx)
 		    (return))
-		  (assert (not (equal entry name))))))
+		  (aver (not (equal entry name))))))
 
 	    (unless (zerop entries-idx)
 	      (setf (aref entries-info (1- entries-idx))