(xml-parse xml-source d) put result in context (bug or feature?)

[IVShilov]

Hi all.

When wrapper sxml:parse called from external function, all symbols goes to context "sxml":

Code Select Expand

((define (sxml:parse xml-source d)
   (xml-type-tags nil nil nil nil)
   (xml-parse xml-source d)
   )
 {<br/>}
31
 ) returns

Code Select Expand

((br)) , but:

Code Select Expand

((define (some-function xml-source)
   (sxml:parse xml-source 31)
   )
 {<br/>}
 ) returns

Code Select Expand

((sxml:br))Bug?