From de3dea381a5a6618f9041e2970c752fd49136dda Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Fri, 10 Apr 2020 13:46:55 +0200
Subject: Add some TODO's.

---
 module/vcomponent/base.scm | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

(limited to 'module/vcomponent/base.scm')

diff --git a/module/vcomponent/base.scm b/module/vcomponent/base.scm
index f93952ca..e0d7d11e 100644
--- a/module/vcomponent/base.scm
+++ b/module/vcomponent/base.scm
@@ -14,7 +14,12 @@
   (make-vline% value parameters)
   vline?
   (value get-vline-value set-vline-value!)
-  (parameters get-vline-parameters))
+  (parameters get-vline-parameters)
+  ;; TODO Add slot for optional source object, containing
+  ;; - file of origin
+  ;; - position in that file
+  ;; - source string, before value parsing.
+  )
 
 (define*-public (make-vline value #:optional (ht (make-hash-table)))
   (make-vline% value ht))
-- 
cgit v1.2.3