Merge pull request #33 from djeis97/iterate-patch

Simple fix for result-type iterate issue.
vseloved · Jan 26, 2017 · 23a3af3 · 23a3af3
2 parents a1117a6 + 1093f98
commit 23a3af3
Showing 1 changed file with 0 additions and 1 deletion.
diff --git a/contrib/iter.lisp b/contrib/iter.lisp
@@ -3000,7 +3000,6 @@ for the keys, the second for the values."
   ""
   ;; VALUE: the list so far.
   ;; TODO: remove the "maybe quoted" idiom from documentation & code
-  (when (quoted? result-type) (setq result-type (second result-type)))
   (when (quoted? place) (setq place (second place)))
   (let ((place-string (locally (declare (optimize safety))
                         (symbol-name place))))