rc

commit 383ea67ea46d335e0bd8b78168cd44c8bd56f6eb
parent 292f79d2715d0e7cdcc0836f6f26ef56967c5f11
Author: Drazen Borkovic <borkovic@users.noreply.github.com>
Date:   Sun, 27 Aug 2017 12:49:03 -0700

Change one continue-testing loop from for to while

Diffstat:
M
trip.rc
 | 
6
+++++-

1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/trip.rc b/trip.rc
@@ -605,14 +605,18 @@ q=''''
 C=$q^while-continue$q
 L=()
 
+save_star = *
 ten = a^(1 2 3 4 5 6 7 8 9 10)
 * = $ten
-for (n) {
+while (! ~ $#* 0) {
+  n = $1; shift
   if (~ $n a2 a3) {
     continue
   }
   L=($L $n)
 }
+* = $save_star; save_star = ()
+
 if (!~ $#L 8) {
   fail Wrong length of list from $C: $#L
 }