[bug #29260] sxml->xml can't use output from xml->sxml

[anonymous]

URL:
  <http://savannah.gnu.org/bugs/?29260>

                 Summary: sxml->xml can't use output from xml->sxml
                 Project: Guile
            Submitted by: None
            Submitted on: Thu 18 Mar 2010 10:30:00 PM UTC
                Category: None
                Severity: 3 - Normal
              Item Group: None
                  Status: None
                 Privacy: Public
             Assigned to: None
             Open/Closed: Open
         Discussion Lock: Any

    _______________________________________________________

Details:

Basically, sxml->xml doesn't like the *TOP* that xml->sxml returns in the
result.


$ git describe 
release_1-9-8-116-gef7e4ba

address@hidden:~$ guile
Guile Scheme interpreter 0.5 on Guile 1.9.8
Copyright (C) 2001-2008 Free Software Foundation, Inc.

Enter `,help' for help.
scheme@(guile-user)> (use-modules (sxml simple))
scheme@(guile-user)>  (sxml->xml (with-input-from-file "foo.xml" xml->sxml))
Throw to key `misc-error':
ERROR: Invalid name starting character "*TOP*" *TOP*
Entering the debugger. Type `bt' for a backtrace or `c' to continue.
0 debug> c
0 debug> 0 debug> 
Backtrace:
In ice-9/boot-9.scm:
1041: 8 [#<procedure fca600 ()>]
  60: 7 [call-with-prompt prompt0 #<procedure d3eee0 ()> ...]
In ice-9/r4rs.scm:
 174: 6 [with-output-to-port #<variable b3ca90 value: #<output: standard
output /dev/pts/5>> ...]
In sxml/simple.scm:
  64: 5 [#<procedure d415c0 at sxml/simple.scm:61:4 ()>]
  53: 4 [#<procedure d16260 at sxml/simple.scm:52:20 (tag . elems)> *TOP* #
#]
 107: 3 [entag *TOP*]
In unknown file:
   ?: 2 [for-each #<procedure d43e60 at sxml/simple.scm:93:5 (s)> ("*TOP*"
#f)]
In sxml/simple.scm:
  97: 1 [#<procedure d43e60 at sxml/simple.scm:93:5 (s)> "*TOP*"]
In ice-9/boot-9.scm:
 847: 0 [error "Invalid name starting character" "*TOP*" *TOP*]

ERROR: Invalid name starting character "*TOP*" *TOP*
scheme@(guile-user)> 




    _______________________________________________________

Reply to this item at:

  <http://savannah.gnu.org/bugs/?29260>

_______________________________________________
  Message sent via/by Savannah
  http://savannah.gnu.org/