From: David Vázquez <davazp@gmail.com>
Date: Wed, 1 May 2013 12:45:51 +0000 (+0100)
Subject: Remove usage of the *block-counter* variable
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=3a08a04dcf44990fb9761d44a85d8b90da5c3465;p=jscl.git

Remove usage of the *block-counter* variable
---

diff --git a/src/toplevel.lisp b/src/toplevel.lisp
index 0a5bb07..c3020c0 100644
--- 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