class: RegressionTests::JavaScriptTests
added:
#testFor07
#testFor08
--- a/RegressionTests__JavaScriptTests.st Thu Jun 06 16:58:40 2013 +0200
+++ b/RegressionTests__JavaScriptTests.st Thu Jun 06 19:16:10 2013 +0200
@@ -1099,6 +1099,70 @@
"
!
+testFor07
+ |output|
+
+ output := '' writeStream.
+ self
+ execute:'test(arg, out) {
+ for (var n = 0, var m = 10; n < 10; n++, m--) {
+ if ((n >= 3) && (n <= 6)) {
+ out.show(n);
+ out.show(" -> ");
+ out.showCR(m);
+ }
+ }
+ }'
+ for:nil
+ arguments:(Array with:5 with:output)
+ expect:nil.
+
+ self assert:(output contents asCollectionOfLinesWithReturn asArray = #(
+ '3 -> 7'
+ '4 -> 6'
+ '5 -> 5'
+ '6 -> 4'
+ ))
+
+ "
+ self run:#testFor06
+ self new testFor06
+ "
+!
+
+testFor08
+ |output|
+
+ output := '' writeStream.
+ self
+ execute:'test(arg, out) {
+ var x = 10;
+
+ for (var n = 0, var m = 10; n < 10; n++, m--) {
+ if ((n >= 3) && (n <= 6)) {
+ if ((n >= 4) && (n <= 5)) {
+ out.show(n);
+ out.show(" -> ");
+ out.showCR(m);
+ }
+ }
+ }
+ }'
+ for:nil
+ arguments:(Array with:5 with:output)
+ expect:nil.
+
+ self assert:(output contents asCollectionOfLinesWithReturn asArray = #(
+ '4 -> 6'
+ '5 -> 5'
+ ))
+
+ "
+ self run:#testFor06
+ self new testFor06
+ "
+!
+
testForIn01
|output|