[spec/loop] Add test case for multi-level continue.

Part of #1459.

Didn't realize this worked.

benchmarks/gc.sh

@@ -531,7 +531,17 @@ gc-run-big() {
 # This hit the 24-bit object ID limitation in 2.5 seconds
 # Should be able to run indefinitely.
 run-for-a-long-time() {
-  time _OIL_GC_VERBOSE=1 OIL_GC_STATS=1 _bin/cxx-opt/oils_cpp benchmarks/compute/fib.sh 10000
+  time _OIL_GC_VERBOSE=1 OIL_GC_STATS=1 _bin/cxx-opt/osh benchmarks/compute/fib.sh 10000
+}
+
+run-loop() {
+  ninja _bin/cxx-dbg/osh
+  time _OIL_GC_VERBOSE=1 OIL_GC_STATS=1 _bin/cxx-dbg/osh -c '
+for x in $(seq 1000); do
+  echo $x
+  continue  # make sure it does GC
+done
+'
 }
 
 "$@"

spec/loop.test.sh

@@ -435,3 +435,39 @@ echo "$counterB"
 99
 50
 ## END
+
+
+#### multi-level continue
+
+for i in 1 2; do
+  for j in a b c; do
+    if test $j = b; then
+      continue
+    fi
+    echo $i $j
+  done
+done
+
+echo ---
+
+for i in 1 2; do
+  for j in a b c; do
+    if test $j = b; then
+      continue 2   # MULTI-LEVEL
+    fi
+    echo $i $j
+  done
+done
+
+
+## STDOUT:
+1 a
+1 c
+2 a
+2 c
+---
+1 a
+2 a
+## END
+
+

test/spec.sh

@@ -380,7 +380,7 @@ quote() {
 }
 
 loop() {
-  sh-spec spec/loop.test.sh --osh-failures-allowed 1 \
+  sh-spec spec/loop.test.sh --osh-failures-allowed 2 \
     ${REF_SHELLS[@]} $ZSH $OSH_LIST "$@"
 }