9 lines
263 B
Scheme
9 lines
263 B
Scheme
(require (planet "ssax.ss" ("lizorkin" "ssax.plt" 1 3)))
|
|
|
|
(collect-garbage)
|
|
(time (void (ssax:xml->sxml
|
|
(open-input-file (build-path
|
|
(current-load-relative-directory)
|
|
"input.xml"))
|
|
null)))
|