From 529d16d0b258755e752e22e2b53b52d677e7f0f2 Mon Sep 17 00:00:00 2001
From: sds <sds@localhost>
Date: Thu, 15 Apr 2010 13:51:53 +0000
Subject: [PATCH] fix test numbering, reported by Raymond Toy
 <toy.raymond@gmail.com>

---
 ansi-tests/loop10.lsp | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/ansi-tests/loop10.lsp b/ansi-tests/loop10.lsp
index 95278c08..8052c5f3 100644
--- a/ansi-tests/loop10.lsp
+++ b/ansi-tests/loop10.lsp
@@ -516,43 +516,43 @@
    (loop for x from 1 to 10 counting (expand-in-current-env (%m t))))
   10)
 
-(deftest loop.10.106
+(deftest loop.10.107
   (macrolet
    ((%m (z) z))
    (loop for x from 1 to 10 count (expand-in-current-env (%m nil))))
   0)
 
-(deftest loop.10.107
+(deftest loop.10.108
   (macrolet
    ((%m (z) z))
    (loop for x in '(1 4 10 5 7 9) maximize (expand-in-current-env (%m x))))
   10)
 
-(deftest loop.10.108
+(deftest loop.10.109
   (macrolet
    ((%m (z) z))
    (loop for x in '(1 4 10 5 7 9) maximizing (expand-in-current-env (%m 17))))
   17)
 
-(deftest loop.10.109
+(deftest loop.10.110
   (macrolet
    ((%m (z) z))
    (loop for x in '(5 4 10 1 7 9) minimize (expand-in-current-env (%m x))))
   1)
 
-(deftest loop.10.110
+(deftest loop.10.111
   (macrolet
    ((%m (z) z))
    (loop for x in '(5 4 10 1 7 9) minimizing (expand-in-current-env (%m 3))))
   3)
 
-(deftest loop.10.111
+(deftest loop.10.112
   (macrolet
    ((%m (z) z))
    (loop for x in '(1 4 10 5 7 9) sum (expand-in-current-env (%m x))))
   36)
 
-(deftest loop.10.112
+(deftest loop.10.113
   (macrolet
    ((%m (z) z))
    (loop for x in '(1 4 10 5 7 9) summing (expand-in-current-env (%m 2))))
-- 
GitLab