msxml>csv ( outfile infile -- )

Vocabulary

msxml-to-csv

Inputs

outfile	an object
infile	an object

Outputs

None

Definition

USING: io.encodings.ascii io.files kernel sequences xml ;

IN: msxml-to-csv

: msxml>csv ( outfile infile -- )
    file>xml (msxml>csv) [ "," join ] map
    swap ascii set-file-lines ;