Map SXML->LOW-LEVEL-SXML to Oleg's PRE-POST-ORDER

This commit is contained in:
interp 2003-05-04 14:04:54 +00:00
parent b95d65509e
commit 63afb5d073
2 changed files with 3 additions and 0 deletions

View File

@ -61,6 +61,7 @@
;; Extensions/Exports to/from Olegs SSAX library
(define-interface surflets/sxml-interface
(export display-low-level-sxml
sxml->low-level-sxml ;direct map to pre-post-order
sxml->string
sxml->string/internal
sxml-attribute?

View File

@ -23,6 +23,8 @@
(display (car fragments) port)
(loop (cdr fragments) #t)))))
(define sxml->low-level-sxml pre-post-order)
;; Gives you a string representing the HTML of the already reformatted
;; SXML-TREE.
(define (sxml->string sxml-tree rules)