Index: /trunk/tests/ansi-tests/ccl.lsp
===================================================================
--- /trunk/tests/ansi-tests/ccl.lsp	(revision 12852)
+++ /trunk/tests/ansi-tests/ccl.lsp	(revision 12853)
@@ -1475,4 +1475,5 @@
 
 
+#+ccl-0711 (progn ;; not merged yet
 (deftest ccl.61783-1
     (test-compiler-warning "(defgeneric ccl.61783-1 (x y))
@@ -1526,4 +1527,10 @@
                             (defgeneric ccl.61783-6-rev (x &key a &allow-other-keys))")
   ())
-
-
+) ;; #+ccl-0711
+
+
+(deftest ccl.bug#592
+    (test-compiler-warning "(macrolet ((tag () 1))
+                              (eval-when (:compile-toplevel :load-toplevel :execute)
+                                (assert (= 1 (tag)))))")
+  ())