*** empty log message ***
[m17n/m17n-lib-cs.git] / xex.xml
1 <?xml version='1.0'?>
2 <expr>
3   <defun fname="factorial">
4     <args><variable vname="x"/></args>
5     <body>
6       <if><lt><variable vname="x"/><integer>2</integer></lt>
7         <variable vname="x"/>
8         <mul>
9           <variable vname="x"/>
10           <funcall fname="factorial">
11             <sub vname="x"><integer>1</integer></sub>
12           </funcall>
13         </mul>
14       </if>
15     </body>
16   </defun>
17
18   <defun fname="temp">
19     <args-unevalled><variable vname="x"/>
20       <optional/><variable vname="y"/>
21       <rest/><variable vname="rest"/>
22     </args-unevalled>
23     <body>
24       <list><variable vname="x"/></list>
25     </body>
26   </defun>
27
28   <set vname="x"><integer>10</integer></set>
29   <set vname="str"><string>ABC</string></set>
30   <append>
31     <funcall fname="factorial"><variable vname="x"/></funcall>
32     <ins vname="str"><integer>1</integer><string>123</string></ins>
33     <del vname="str"><integer>2</integer><integer>4</integer></del>
34     <cond>
35       <list><gt><integer>0</integer><integer>1</integer></gt>
36         <string>1st</string></list>
37       <list><integer>1</integer>
38         <string>2nd</string></list>
39     </cond>
40     <foreach vname="a">
41       <list><integer>10</integer><integer>11</integer></list>
42       <add vname="x"><variable vname="a"/></add>
43     </foreach>
44     <variable vname="x"/>
45     <eval><variable vname="x"/></eval>
46     <eval>
47       <eval>
48         <quote><add><variable vname="x"/><integer>1</integer></add></quote>
49       </eval>
50     </eval>
51   </append>
52 </expr>