From 297ca4f7c140d6ef4af01eb40420e2a660bc3978 Mon Sep 17 00:00:00 2001
From: Douglas Katzman <dougk@google.com>
Date: Sat, 19 Mar 2016 11:20:43 -0400
Subject: [PATCH] Fix style warning

---
 src/compiler/disassem.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/compiler/disassem.lisp b/src/compiler/disassem.lisp
index 4f354422f..8249ff3c7 100644
--- a/src/compiler/disassem.lisp
+++ b/src/compiler/disassem.lisp
@@ -516,6 +516,7 @@
 ;;; RENDERING style, which is one of :RAW, :SIGN-EXTENDED,
 ;;; :FILTERED, :NUMERIC, and :FINAL. Each rendering depends on the preceding
 ;;; one, so asking for :FINAL will implicitly compute all renderings.
+(defvar *!temp-var-counter*)
 (defun gen-arg-forms (arg rendering funstate)
   (labels ((tempvars (n)
              (if (plusp n)
@@ -631,7 +632,6 @@
            `((lookup-label ,(maybe-listify numeric-forms)))
            numeric-forms)))))
 
-(defvar *!temp-var-counter*)
 (defun find-printer-fun (printer-source args cache *current-instruction-flavor*)
   (let* ((source (preprocess-printer printer-source args))
          (funstate (make-funstate args))
-- 
2.11.4.GIT