xex.xml

   1 <?xml version='1.0'?>
   2 <expr>
   3   <defun fname="factorial">
   4     <args><symbol>x</symbol></args>
   5     <body>
   6       <if><lt><variable vname="x"/><integer>2</integer></lt>
   7         <variable vname="x"/>
   8         <mul>
   9           <funcall fname="factorial">
  10             <sub><variable vname="x"/><integer>1</integer></sub>
  11           </funcall>
  12           <variable vname="x"/>
  13         </mul>
  14       </if>
  15     </body>
  16   </defun>
  17
  18   <defun fname="temp">
  19     <args-unevalled><symbol>x</symbol>
  20       <optional/><symbol>y</symbol>
  21       <rest/><symbol>rest</symbol>
  22     </args-unevalled>
  23     <body>
  24       <list><variable vname="x"/></list>
  25     </body>
  26   </defun>
  27
  28   <set><symbol>x</symbol><integer>10</integer></set>
  29   <set><symbol>str</symbol><string>ABC</string></set>
  30   <append>
  31     <funcall fname="factorial"><variable vname="x"/></funcall>
  32     <funcall fname="temp">
  33       <symbol>sym</symbol>
  34       <symbol>sym</symbol>
  35       <symbol>sym</symbol>
  36     </funcall>
  37     <nth><integer>1</integer>
  38       <concat>
  39         <variable vname="str"/>
  40         <list><integer>0x40</integer><integer>0x41</integer></list>
  41       </concat>
  42     </nth>
  43   </append>
  44 </expr>