Contents

#
# Testing OpenWFE
#
# John Mettraux at openwfe.org
#
# Mon Oct  9 22:19:44 JST 2006
#

require 'flowtestbase'


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

  #def setup
  #end

  #def teardown
  #end

  def test_fqv_0
    dotest(
'''<process-definition name="n" revision="0">
  <sequence>
    <set variable="x"><q>y</q></set>
    <print>x is "${x}"</print>
  </sequence>
</process-definition>''',
'x is "y"')
  end

  def test_fqv_1
    dotest(
'''<process-definition name="n" revision="0">
  <sequence>
    <set variable="x0"><q>y0</q></set>
    <set variable="x1"><v>x0</v></set>
    <print>x1 is "${x1}"</print>
  </sequence>
</process-definition>''',
'x1 is "y0"')
  end

  def test_fqv_2
    dotest(
'''<process-definition name="n" revision="0">
  <sequence>
    <set field="x0"><q>y0</q></set>
    <set variable="x1"><f>x0</f></set>
    <print>x1 is "${x1}"</print>
  </sequence>
</process-definition>''',
'x1 is "y0"')
  end

  class Fqv3 < OpenWFE::ProcessDefinition
    sequence do
      _set :f => "x0" do
        _q "y0"
      end
      _set :v => "x1" do
        _f "x0"
      end
      _print "x1 is \"${x1}\""
    end
  end
  def test_fqv_3
    dotest(Fqv3, 'x1 is "y0"')
  end

end

Version data entries

1 entries across 1 versions & 1 rubygems

Version	Path
ruote-0.9.19	test/ft_16_fqv.rb