Index: /branches/working-0711/ccl/compiler/X86/x86-lap.lisp
===================================================================
--- /branches/working-0711/ccl/compiler/X86/x86-lap.lisp	(revision 7716)
+++ /branches/working-0711/ccl/compiler/X86/x86-lap.lisp	(revision 7717)
@@ -32,5 +32,5 @@
        (progn
          (when (null (list-length data))
-           (break "frag-vector freelist is circular"))
+           (compiler-bug "frag-vector freelist is circular"))
          (setf (pool.data *x86-lap-frag-vector-freelist*) (cdr data))
          (rplacd data nil))