test/spec/spectest43.xml
author ali <ali@juiblex.co.uk>
Wed Oct 10 22:58:48 2012 +0100 (2012-10-10)
changeset 1 fe592b4168f3
permissions -rw-r--r--
Added tag 1.0 for changeset bc8c9a11cbfc
ali@0
     1
<expr>
ali@0
     2
  <define name="test-one" args="x">
ali@0
     3
    <switch>
ali@0
     4
      <case>
ali@0
     5
	<eq><x/>1</eq>
ali@0
     6
	1
ali@0
     7
      </case>
ali@0
     8
      <case>
ali@0
     9
	<true/>
ali@0
    10
	2
ali@0
    11
      </case>
ali@0
    12
    </switch>
ali@0
    13
  </define>
ali@0
    14
ali@0
    15
  <define name="test-two" args="x">
ali@0
    16
    <switch>
ali@0
    17
      <case>
ali@0
    18
	<eq><x/>1</eq>
ali@0
    19
	1
ali@0
    20
      </case>
ali@0
    21
    </switch>
ali@0
    22
  </define>
ali@0
    23
ali@0
    24
  <and>
ali@0
    25
    <if>
ali@0
    26
      <eq>
ali@0
    27
	<test-one>1</test-one>
ali@0
    28
	<integer>1</integer>
ali@0
    29
      </eq>
ali@0
    30
      <print newline="true">PASS</print>
ali@0
    31
      <expr>
ali@0
    32
	<print newline="true">FAIL</print>
ali@0
    33
	<false/>
ali@0
    34
      </expr>
ali@0
    35
    </if>
ali@0
    36
ali@0
    37
    <if>
ali@0
    38
      <eq>
ali@0
    39
	<test-one>2</test-one>
ali@0
    40
	<integer>2</integer>
ali@0
    41
      </eq>
ali@0
    42
      <print newline="true">PASS</print>
ali@0
    43
      <expr>
ali@0
    44
	<print newline="true">FAIL</print>
ali@0
    45
	<false/>
ali@0
    46
      </expr>
ali@0
    47
    </if>
ali@0
    48
ali@0
    49
    <if>
ali@0
    50
      <eq>
ali@0
    51
	<test-two>1</test-two>
ali@0
    52
	<integer>1</integer>
ali@0
    53
      </eq>
ali@0
    54
      <print newline="true">PASS</print>
ali@0
    55
      <expr>
ali@0
    56
	<print newline="true">FAIL</print>
ali@0
    57
	<false/>
ali@0
    58
      </expr>
ali@0
    59
    </if>
ali@0
    60
ali@0
    61
    <if>
ali@0
    62
      <eq>
ali@0
    63
	<test-two>2</test-two>
ali@0
    64
	<nil/>
ali@0
    65
      </eq>
ali@0
    66
      <print newline="true">PASS</print>
ali@0
    67
      <expr>
ali@0
    68
	<print newline="true">FAIL</print>
ali@0
    69
	<false/>
ali@0
    70
      </expr>
ali@0
    71
    </if>
ali@0
    72
  </and>
ali@0
    73
</expr>