Contents

#
# Testing OpenWFEru
#
# John Mettraux at openwfe.org
#
# Sat Feb 16 19:07:42 JST 2008
#

require 'flowtestbase'


class FlowTest83 < Test::Unit::TestCase
    include FlowTestBase

    #def setup
    #end

    #def teardown
    #end

    #
    # Test 0
    #

    class Test0 < OpenWFE::ProcessDefinition
        concurrence do
            _loop do
                alpha
            end
            _loop do
                alpha
            end
        end
    end

    def test_0

        @engine.register_participant :alpha do
            sleep 0.002
        end

        fei = launch Test0

        sleep 0.350

        1000.times do |i|
            print "."
            ps = @engine.process_status fei
            assert ( ! ps.paused?)
            #p ps.expressions.size
        end

        #dotest Test0, "1\n2\n3"
    end

end

Version data entries

1 entries across 1 versions & 1 rubygems

Version	Path
ruote-0.9.18	test/ft_83_badpause.rb