From f4dcab9203d8c0d33fbae244fe9d8e904675c59a Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Daniel=20Kochma=C5=84ski?= <dkochmanski@hellsgate.pl>
Date: Sat, 14 Mar 2015 20:08:47 +0100
Subject: [PATCH] loop2.lsp: declare ignoring 'env' in 'loop-body'. Closes #15.

---
 src/lsp/loop2.lsp | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/lsp/loop2.lsp b/src/lsp/loop2.lsp
index 5bba874c0..7b59d8ec0 100755
--- a/src/lsp/loop2.lsp
+++ b/src/lsp/loop2.lsp
@@ -585,6 +585,7 @@ a LET-like macro, and a SETQ-like macro, which perform LOOP-style destructuring.
 		     main-body
 		     after-loop
 		     epilogue)
+  (declare (ignore env))
   (unless (= (length before-loop) (length after-loop))
     (error "LOOP-BODY called with non-synched before- and after-loop lists."))
   ;;All our work is done from these copies, working backwards from the end: