From 8a84b5b44ff8d7d6b4e34118f29a1ea7313fea77 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Mon, 15 Jun 2020 20:45:31 +0200
Subject: Updated type signatures in component.

---
 module/vcomponent/parse/component.scm | 4 ++--
 1 file 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 #\:))
-- 
cgit v1.2.3