From 2bfe9b055193e70a7e8e9aea81790c42c41c45a9 Mon Sep 17 00:00:00 2001 From: Brady McDonough Date: Mon, 25 Jan 2021 19:41:04 -0700 Subject: [PATCH] Minor commenting --- csv/csv.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/csv/csv.scm b/csv/csv.scm index 0df10e1..dab98a0 100644 --- a/csv/csv.scm +++ b/csv/csv.scm @@ -78,7 +78,7 @@ (reverse (csv-read port delimiter new-row have-cell have-row init-seed)))) -;; read csv file and convert to sxml +;; read csv file and convert to an sxml tree (define* (csv->sxml port #:key (delimiter #\,) @@ -98,6 +98,7 @@ (r (string->symbol (record-sym n)))) (lp (cdr rest) (cons (list r line) result) (1+ n)))))))) +;; read a csv file and convert to a string of XML (define* (csv->xml port #:key (delimiter #\,)