From 579e28599eccb032d300a7e284e78cdd94e2a942 Mon Sep 17 00:00:00 2001
From: pfdietz <pfdietz@localhost>
Date: Sat, 28 Aug 2004 22:07:41 +0000
Subject: [PATCH] Fixed two typos

---
 ansi-tests/loop5.lsp | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ansi-tests/loop5.lsp b/ansi-tests/loop5.lsp
index 190276b6..01673320 100644
--- a/ansi-tests/loop5.lsp
+++ b/ansi-tests/loop5.lsp
@@ -176,7 +176,7 @@
 	  for v = (make-array '(10) :initial-contents fvals :element-type type)
 	  for r = (loop for x across v collect x)
 	  unless (equal r fvals)
-	  collect (list i r)))
+	  collect (list fvals r)))
   nil)
 
 (deftest loop.5.43
@@ -187,7 +187,7 @@
 	  for v = (make-array '(10) :initial-contents fvals :element-type type)
 	  for r = (loop for x across v collect x)
 	  unless (equal r fvals)
-	  collect (list i r)))
+	  collect (list fvals r)))
   nil)
 
 ;;; Error cases
-- 
GitLab