4.8.0.4 0.5.0
-------------

#;2> (html->sxml "x<y z=\"&quot;\">")
(*TOP* "x" (y (@ (z "&quot;"))))

#;3> (define content "<br>\r\n<br>\r\n<div data=\"(sxml (@ (attr &quot;12345&quot;)) body)\">div body</div>")
#;4> (html->sxml content)
(*TOP* (br) "\r\n" (br) "\r\n" (div (@ (data "(sxml (@ (attr &quot;12345&quot;)) body)")) "div body"))
#;5> (html->sxml  "<br>\r\n<br>\r\n<div data=\"(sxml (@ (attr &quot;12345&quot;)) body)\">div body</div>")
(*TOP* (br) "\r\n" (br) "\r\n" (div (@ (data "(sxml (@ (attr &quot;12345&quot;)) body)")) "div body"))

              overrun quote-decode
sjamaan test:   NO        NO
andyjpb test:   NO        NO

overall: OK


4.8.0.4 0.5.2
-------------

#;1> (use html-parser)
; loading /usr/local/chicken-4.9.0/lib/chicken/7/html-parser.import.so ...
; loading /usr/local/chicken-4.9.0/lib/chicken/7/html-parser.so ...
#;2> (html->sxml "x<y z=\"&quot;\">")
(*TOP* "x" (y (@ (z "\""))))

#;3> (define content "<br>\r\n<br>\r\n<div data=\"(sxml (@ (attr &quot;12345&quot;)) body)\">div body</div>")
#;4> (html->sxml content)
(*TOP* (br) "\r\n" (br) "\r\n" (div (@ (data "(sxml (@ (attr \"12345\")) body)")) "div body"))
#;5> 
#;5> (html->sxml  "<br>\r\n<br>\r\n<div data=\"(sxml (@ (attr &quot;12345&quot;)) body)\">div body</div>")
(*TOP* (br) "\r\n" (br) "\r\n" (div (@ (data "(sxml (@ (attr \"12345\")) body)")) "div body"))

              overrun quote-decode
sjamaan test:   NO        YES
andyjpb test:   NO        YES

overall: OK


4.9.0rc1 0.5.3
--------------

#;1> (use html-parser)
; loading /usr/local/chicken-4.9.0/lib/chicken/7/html-parser.import.so ...
; loading /usr/local/chicken-4.9.0/lib/chicken/7/html-parser.so ...
#;2> (html->sxml "x<y z=\"&quot;\">")
(*TOP* "x" (y (@ (z "\""))))

#;3> (define content "<br>\r\n<br>\r\n<div data=\"(sxml (@ (attr &quot;12345&quot;)) body)\">div body</div>")
#;4> (html->sxml content)
(*TOP* (br) "\r\n" (br) "\r\n" (div (@ (data "(sxml (@ (attr \"12345\")) body)")) "div body"))
#;5> (html->sxml  "<br>\r\n<br>\r\n<div data=\"(sxml (@ (attr &quot;12345&quot;)) body)\">div body</div>")
(*TOP* (br) "\r\n" (br) "\r\n" (div (@ (data "(sxml (@ (attr \"12345\")) body)")) "div body"))

              overrun quote-decode
sjamaan test:   NO        YES
andyjpb test:   NO        YES

overall: OK


4.9.0rc1 0.5.2
--------------


#;1> (use html-parser)
; loading /usr/local/chicken-4.9.0/lib/chicken/7/html-parser.import.so ...
; loading /usr/local/chicken-4.9.0/lib/chicken/7/html-parser.so ...
#;2> (html->sxml "x<y z=\"&quot;\">")
(*TOP* "x" (y (@ (z "\"x"))))

#;3> (define content "<br>\r\n<br>\r\n<div data=\"(sxml (@ (attr &quot;12345&quot;)) body)\">div body</div>")
#;4> (html->sxml content)
(*TOP* (br) "\r\n" (br) "\r\n" (div (@ (data "(sxml (@ (attr \"\r\nbr\r\nbr12345\"\r\nbr\r\nbr)) body)")) "div body"))
#;5> (html->sxml  "<br>\r\n<br>\r\n<div data=\"(sxml (@ (attr &quot;12345&quot;)) body)\">div body</div>")
(*TOP* (br) "\r\n" (br) "\r\n" (div (@ (data "(sxml (@ (attr \"\r\nbr\r\nbr12345\"\r\nbr\r\nbr)) body)")) "div body")

              overrun quote-decode
sjamaan test:   YES        YES
andyjpb test:   YES        YES

overall: OK


4.9.0rc1 0.5.0
--------------

#;1> (use html-parser)
; loading /usr/local/chicken-4.9.0/lib/chicken/7/html-parser.import.so ...
; loading /usr/local/chicken-4.9.0/lib/chicken/7/html-parser.so ...
#;2> 
#;2> (html->sxml "x<y z=\"&quot;\">")
(*TOP* "x" (y (@ (z "&quot;"))))

#;3> (define content "<br>\r\n<br>\r\n<div data=\"(sxml (@ (attr &quot;12345&quot;)) body)\">div body</div>")
#;4> (html->sxml content)
(*TOP* (br) "\r\n" (br) "\r\n" (div (@ (data "(sxml (@ (attr &quot;12345&quot;)) body)")) "div body"))

              overrun quote-decode
sjamaan test:   NO        NO
andyjpb test:   NO        NO

overall: OK