test/spec/spectest11.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="pi">3.14</define>
ali@0
     3
ali@0
     4
  <define name="times-two" args="x">
ali@0
     5
    <multiply><get name="x"/>2</multiply>
ali@0
     6
  </define>
ali@0
     7
ali@0
     8
  <and>
ali@0
     9
    <if>
ali@0
    10
      <eq>
ali@0
    11
	<pi/>
ali@0
    12
	<float>3.14</float>
ali@0
    13
      </eq>
ali@0
    14
      <print newline="true">PASS</print>
ali@0
    15
      <expr>
ali@0
    16
	<print newline="true">FAIL</print>
ali@0
    17
	<false/>
ali@0
    18
      </expr>
ali@0
    19
    </if>
ali@0
    20
ali@0
    21
    <if>
ali@0
    22
      <eq>
ali@0
    23
	<times-two>10</times-two>
ali@0
    24
	<integer>20</integer>
ali@0
    25
      </eq>
ali@0
    26
      <print newline="true">PASS</print>
ali@0
    27
      <expr>
ali@0
    28
	<print newline="true">FAIL</print>
ali@0
    29
	<false/>
ali@0
    30
      </expr>
ali@0
    31
    </if>
ali@0
    32
ali@0
    33
    <if>
ali@0
    34
      <eq>
ali@0
    35
	<times-two>
ali@0
    36
	  2
ali@0
    37
	  <set name="x">4</set>
ali@0
    38
	</times-two>
ali@0
    39
	<integer>8</integer>
ali@0
    40
      </eq>
ali@0
    41
      <print newline="true">PASS</print>
ali@0
    42
      <expr>
ali@0
    43
	<print newline="true">FAIL</print>
ali@0
    44
	<false/>
ali@0
    45
      </expr>
ali@0
    46
    </if>
ali@0
    47
ali@0
    48
    <print newline="true">
ali@0
    49
	<string>Times two returns: </string>
ali@0
    50
	<times-two>
ali@0
    51
	  2
ali@0
    52
	  <define name="x">5</define>
ali@0
    53
	</times-two>
ali@0
    54
    </print>
ali@0
    55
ali@0
    56
    <if>
ali@0
    57
      <eq>
ali@0
    58
	<times-two>
ali@0
    59
	  2
ali@0
    60
	  <define name="x">5</define>
ali@0
    61
	</times-two>
ali@0
    62
	<integer>10</integer>
ali@0
    63
      </eq>
ali@0
    64
      <print newline="true">PASS</print>
ali@0
    65
      <expr>
ali@0
    66
	<print newline="true">FAIL</print>
ali@0
    67
	<false/>
ali@0
    68
      </expr>
ali@0
    69
    </if>
ali@0
    70
  </and>
ali@0
    71
</expr>