#
# Testing OpenWFE
#
# John Mettraux at openwfe.org
#
# Tue Jan  2 13:14:37 JST 2007
#

require 'flowtestbase'
require 'openwfe/expressions/raw_prog'


class FlowTest12 < FlowTestBase

    #def setup
    #end

    #def teardown
    #end

    #
    # Test 0
    #

    class BpDef0 < OpenWFE::ProcessDefinition
        def make
            process_definition :name => "test0", :revision => "0" do
                sequence do
                    participant :ref => "block-participant"
                    _print "done."
                end
            end
        end
    end

    def test_block_participant
        dotest(
            BpDef0,
            """the block participant received a workitem
done.""")
    end

end