Add sxml->string/internal
This commit is contained in:
parent
d1c7b4e9d3
commit
e151572459
|
@ -32,6 +32,9 @@
|
|||
(pre-post-order sxml-tree rules)
|
||||
port))))
|
||||
|
||||
(define (sxml->string/internal sxml-tree rules)
|
||||
(list (sxml->string sxml-tree rules)))
|
||||
|
||||
;; Predicate for attributes in sxml.
|
||||
(define (sxml-attribute? thing)
|
||||
(and (pair? thing)
|
||||
|
|
Loading…
Reference in New Issue