Remove usage of the *block-counter* variable

diff --git a/src/toplevel.lisp b/src/toplevel.lisp
index 0a5bb07..c3020c0 100644 (file)
--- a/src/toplevel.lisp
+++ b/src/toplevel.lisp
@@ -103,8 +103,7 @@
                  *literal-table*)
        (setq *literal-table* ',*literal-table*)
        (setq *variable-counter* ,*variable-counter*)
-       (setq *gensym-counter* ,*gensym-counter*)
-       (setq *block-counter* ,*block-counter*)))))
+       (setq *gensym-counter* ,*gensym-counter*)))))
 
 (eval-when-compile
   (toplevel-compilation