diff options
| -rw-r--r-- | module/vcomponent/parse/component.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/module/vcomponent/parse/component.scm b/module/vcomponent/parse/component.scm index 3278af85..690c0698 100644 --- a/module/vcomponent/parse/component.scm +++ b/module/vcomponent/parse/component.scm @@ -26,7 +26,7 @@ (latitude geo-latitude) (longitude geo-longitude)) -;; port → (list string) +;; port → (list <line>) (define (read-file port) (define fname (port-filename port)) (let loop ((line-number 1) (done '())) @@ -57,7 +57,7 @@ (data get-data) ; (key kv ... value) ) -;; (list <line>) → (list (key kv ... value)) +;; (list <line>) → (list <tokens>) (define (tokenize line-obj) (define line (get-string line-obj)) (define colon-idx (string-index line #\:)) |