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

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


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

    #def setup
    #end

    #def teardown
    #end

    #
    # Test 0
    #

    class Test0 < OpenWFE::ProcessDefinition
        sequence do
            set :field => "participant_list", :value => "a, b, c"
            iterator :on_value => "${f:participant_list}", :to_variable => "p" do
                participant "${p}"
            end
            _print "done."
        end
    end

    def test_0

        @engine.register_participant "." do |workitem|
            @tracer << workitem.participant_name
        end

        dotest Test0, "abcdone."
    end

end