gistfile1.txt

<rooms>

<room>
<name> Room 1 </name>
<desc> room 1's desc </desc>
<desc-long> room 1's long description </desc-long>
<features>
   <feature>
   <name> room 1's feature </name>
   <desc> ... </desc>
   <desc-long> ... </desc-long>
   <features>
        <feature>
        <name> A feature for room 1's feature </name>
        <desc>..</desc>
        <desc-long> .. </desc-long>
        </feature>
   </features>
   </feature>
</features>
</room>
<room>
...
</room>
</rooms>

----------------------
---lisp output file---
----------------------
(make-room 
:name "Room 1" 
:desc "..." 
:desc-long "..." 
:features (list (make-feature 
                 :name "room 1's feature"
                 :desc "..."
                 :desc-long "..."
                 :features (list (make-feature :name "..." ...)))))
(make-room
:name ... )

EOF