;;;; csv-xml.scm (module csv-xml (;export csv->list csv->sxml csv-for-each csv-map make-csv-reader make-csv-reader-maker) (import scheme (except chicken provide)) ;Need to process `#lang' as well. So just "commented out" the "offending" ;sections in the source. #;(define-syntax provide (syntax-rules () ((_ ?x0 ...) (begin)))) (define null '()) (include "csv.ss") ) ;csv-xml