summaryrefslogtreecommitdiff
path: root/examples/box-dynamic-module/box-module.scm
diff options
context:
space:
mode:
Diffstat (limited to 'examples/box-dynamic-module/box-module.scm')
-rw-r--r--examples/box-dynamic-module/box-module.scm12
1 files changed, 10 insertions, 2 deletions
diff --git a/examples/box-dynamic-module/box-module.scm b/examples/box-dynamic-module/box-module.scm
index cab41c7e5..ab589ba1b 100644
--- a/examples/box-dynamic-module/box-module.scm
+++ b/examples/box-dynamic-module/box-module.scm
@@ -1,5 +1,5 @@
-;;; examples/box-dynamic-module/box-module.scm -- Scheme part of the
-;;; dynamic module (box-module)
+;;; examples/box-dynamic-module/box-module.scm -- Scheme module exporting
+;;; some functionality from the shared library libbox-module.
;;; Commentary:
@@ -14,4 +14,12 @@
(define-module (box-module))
+;; First, load the library.
+;;
(load-extension "libbox-module" "scm_init_box")
+
+;; Then export the procedures which should be visible to module users.
+;;
+(export make-box box-ref box-set!)
+
+;;; End of file.