From 5b33ed3df93a6c71b10d45e44926020c2b8e1db6 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Martin=20Grabm=C3=BCller?= <mgrabmue@cs.tu-berlin.de>
Date: Thu, 7 Jun 2001 12:18:01 +0000
Subject: Added scheme module file.

---
 examples/box-dynamic-module/box-module.scm | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100644 examples/box-dynamic-module/box-module.scm

(limited to 'examples')

diff --git a/examples/box-dynamic-module/box-module.scm b/examples/box-dynamic-module/box-module.scm
new file mode 100644
index 000000000..cab41c7e5
--- /dev/null
+++ b/examples/box-dynamic-module/box-module.scm
@@ -0,0 +1,17 @@
+;;; examples/box-dynamic-module/box-module.scm -- Scheme part of the
+;;;   dynamic module (box-module)
+
+;;; Commentary:
+
+;;; This is the Scheme part of the dynamic library module (box-module).
+;;; When you do a (use-modules (box-module)) in this directory,
+;;; this file gets loaded and will load the compiled extension.
+
+;;; Code:
+
+;;; Author: Martin Grabmueller
+;;; Date: 2001-06-06
+
+(define-module (box-module))
+
+(load-extension "libbox-module" "scm_init_box")
-- 
cgit v1.2.1