From 19a5daaec41aea330c081bd0b1fe228f7a5bb998 Mon Sep 17 00:00:00 2001
From: Lockywolf <lockywolf@gmail.com>
Date: Fri, 9 Aug 2019 01:51:14 +0800
Subject: Add a first version of geiser:symbol-location for local files.

---
 scheme/chibi/geiser/geiser.sld | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'scheme/chibi/geiser/geiser.sld')

diff --git a/scheme/chibi/geiser/geiser.sld b/scheme/chibi/geiser/geiser.sld
index 8e43fb8..86f871a 100644
--- a/scheme/chibi/geiser/geiser.sld
+++ b/scheme/chibi/geiser/geiser.sld
@@ -5,7 +5,7 @@
           geiser:autodoc
           geiser:module-completions
           geiser:no-values
-;TODO:	  geiser:symbol-location ; implement this interface in [[file://./geiser.scm#geiser:symbol-location]] in order to make proper cross-referencing working.
+	  geiser:symbol-location ; implement this interface in [[file://./geiser.scm#geiser:symbol-location]] in order to make proper cross-referencing working.
 	  geiser:module-location
           geiser:newline)
   (import
@@ -13,10 +13,13 @@
     (chibi modules)
     (chibi)
     (chibi filesystem)
+    (chibi pathname)
     (meta)
     (chibi ast)
     (chibi string)
     (srfi 1)
     (srfi 95)
-    (chibi show))
+    (srfi 38)
+    (chibi show)
+    (srfi 115))
   (include "geiser.scm"))
-- 
cgit v1.2.3