[nongnu] elpa/geiser-stklos eb2b13f 02/30: Geiser functions are now in a STklos module

[Philip Kaludercic]

branch: elpa/geiser-stklos
commit eb2b13ff7a37cdd323f0ffd60fbde469e0bd87d8
Author: Jeronimo Pellegrini <j_p@aleph0.info>
Commit: Jeronimo Pellegrini <j_p@aleph0.info>

    Geiser functions are now in a STklos module
    
    * Fix #4
---
 geiser.stk | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

diff --git a/geiser.stk b/geiser.stk
index 7610fdc..8f00b7b 100644
--- a/geiser.stk
+++ b/geiser.stk
@@ -8,6 +8,19 @@
 ;; SPDX-License-Identifier: BSD-3-Clause
 ;; Version: 1.0
 
+(define-module GEISER
+
+  (export geiser:eval
+          geiser:load-file
+          geiser:add-to-load-path
+          geiser:macroexpand
+          geiser:module-completions
+          geiser:completions
+          geiser:module-exports
+          geiser:symbol-documentation
+          geiser:autodoc
+          geiser:no-values)
+
 ;; executes thunk, with all its output (standar and error) redirected
 ;; to a string.
 (define (with-all-output-to-string thunk)
@@ -248,3 +261,11 @@
 
 (define (geiser-compile form module . rest)
   (error "STklos does not support compiling regions"))
+
+) ;; END of module GEISER
+
+;; standard boilerplate for loading modules:
+
+(select-module STklos)
+(import GEISER)
+(provide "geiser")