Remove redundant comments.

src/util-csv.scm

@@ -48,8 +48,6 @@ CSV loader.")
 	 util-io
 	 racket-kwargs)
 
- ;; Curry version of line parser with configurable cell separator and
- ;; string delimiter. Returns a list of lists of strings.
  (define/doc ((make-csv-line-parser separator string-delimiter) line)
    ("Curried version of fast CSV line parser with given separator and string delimiter.
 
@@ -95,7 +93,7 @@ CSV loader.")
 		  (loop (cdr tokens)
 			(cons (cons token (car res)) (cdr res))
 			2)))))))) ; Continue inside quoted data
- ;; Parses given CSV lines list
+
  (define*/doc (csv-parse-lines lines
 			       #:separator (separator #\;)
 			       #:string-delimiter (string-delimiter #\"))
@@ -114,7 +112,6 @@ CSV loader.")
 		   (cons (csv-parse-line line)
 			 res)))))))
  
- ;; Loads given CSV file and parses its lines into lists
  (define/doc (csv-parse fn . args)
    ("Uses ```csv-parse-lines``` on lines read from given file ```fn```.")
    (call/cc
@@ -126,7 +123,6 @@ CSV loader.")
 	 (let ((lines (read-lines/no-bom (open-input-file fn))))
 	   (apply csv-parse-lines lines args)))))))
 
- ;; Splits CSV into header and body based on the first empty row.
  (define/doc (csv-split-header csv)
    ("Splits given loaded CSV into two tables at the first empty row.")
    (let loop ((body csv)