test/ft_23_when.rb in openwferu-0.9.7 vs test/ft_23_when.rb in openwferu-0.9.8

@@ -41,11 +41,38 @@
             end
         end
     end
 
     def test_0
-        #dotest(TestDefinition0, "done\nok")
-        dotest(TestDefinition0, "done\nok", 4)
+        dotest(TestDefinition0, "done\nok", true)
+    end
+
+    #
+    # Test 1
+    #
+
+    class TestWhen1 < ProcessDefinition
+        concurrence do
+            _when :frequency => "2s" do
+                sequence do
+                    #reval "puts '___ equals : ' + fei.wfid"
+                    _equals :value => "${done}", :other_value => "true"
+                end
+                sequence do
+                    #reval "puts '___ consequence : ' + fei.wfid"
+                    _print "ok"
+                end
+            end
+            sequence do
+                _sleep "500"
+                _set :variable => "done", :value => "true"
+                _print "done"
+            end
+        end
+    end
+
+    def test_1
+        dotest(TestWhen1, "done\nok", true)
     end
 
 end