guile/guile-core/examples ChangeLog box-dynamic...

[Martin Grabmueller]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Martin Grabmueller <address@hidden>     01/06/06 13:14:51

Modified files:
        guile-core/examples: ChangeLog 
        guile-core/examples/box-dynamic-module: Makefile.am README box.c 

Log message:
        * box-dynamic-module/box-module.scm: New file.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/examples/ChangeLog.diff?cvsroot=OldCVS&tr1=1.4&tr2=1.5&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/examples/box-dynamic-module/Makefile.am.diff?cvsroot=OldCVS&tr1=1.1&tr2=1.2&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/examples/box-dynamic-module/README.diff?cvsroot=OldCVS&tr1=1.1&tr2=1.2&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/examples/box-dynamic-module/box.c.diff?cvsroot=OldCVS&tr1=1.1&tr2=1.2&r1=text&r2=text

Patches:
Index: guile/guile-core/examples/ChangeLog
diff -u guile/guile-core/examples/ChangeLog:1.4 
guile/guile-core/examples/ChangeLog:1.5
--- guile/guile-core/examples/ChangeLog:1.4     Tue Jun  5 10:33:40 2001
+++ guile/guile-core/examples/ChangeLog Wed Jun  6 13:14:51 2001
@@ -1,3 +1,7 @@
+2001-06-06  Martin Grabmueller  <address@hidden>
+
+       * box-dynamic-module/box-module.scm: New file.
+
 2001-06-05  Martin Grabmueller  <address@hidden>
 
        * box-dynamic-module: New directory, implements the box type in a
Index: guile/guile-core/examples/box-dynamic-module/Makefile.am
diff -u guile/guile-core/examples/box-dynamic-module/Makefile.am:1.1 
guile/guile-core/examples/box-dynamic-module/Makefile.am:1.2
--- guile/guile-core/examples/box-dynamic-module/Makefile.am:1.1        Tue Jun 
 5 10:33:40 2001
+++ guile/guile-core/examples/box-dynamic-module/Makefile.am    Wed Jun  6 
13:14:51 2001
@@ -19,7 +19,7 @@
 ##   to the Free Software Foundation, Inc., 59 Temple Place, Suite
 ##   330, Boston, MA 02111-1307 USA
 
-EXTRA_DIST = README box.c
+EXTRA_DIST = README box.c box-module.scm
 
 CFLAGS=`guile-config compile`
 LIBS=`guile-config link`
Index: guile/guile-core/examples/box-dynamic-module/README
diff -u guile/guile-core/examples/box-dynamic-module/README:1.1 
guile/guile-core/examples/box-dynamic-module/README:1.2
--- guile/guile-core/examples/box-dynamic-module/README:1.1     Tue Jun  5 
10:33:40 2001
+++ guile/guile-core/examples/box-dynamic-module/README Wed Jun  6 13:14:51 2001
@@ -22,23 +22,15 @@
 this module.  See the following example session for usage details:
 
 Extend your LD_LIBRARY_PATH variable (or equivalent) to include . and
-.libs 
+.libs and make sure that your current working directory is the one
+this file is contained in.
 
 If you like this example so much that you want to have it available
 for normal usage, install the dynamic libraries in the .libs directory
-to the directory $(prefix)/lib
+to the directory $(prefix)/lib and the scheme file `box-module.scm' in
+a directory in your GUILE_LOAD_PATH.
 
-Note that after loading the extension, an explicit call to use-modules
-is needed to make the exported procedures available.
-
 $ guile
-guile> (load-extension "libbox-module" "scm_init_box")
-guile> make-box
-<unnamed port>: In expression make-box:
-<unnamed port>: Unbound variable: make-box
-ABORT: (unbound-variable)
-
-Type "(backtrace)" to get more information or "(debug)" to enter the debugger.
 guile> (use-modules (box-module))
 guile> (define b (make-box))
 guile> b
Index: guile/guile-core/examples/box-dynamic-module/box.c
diff -u guile/guile-core/examples/box-dynamic-module/box.c:1.1 
guile/guile-core/examples/box-dynamic-module/box.c:1.2
--- guile/guile-core/examples/box-dynamic-module/box.c:1.1      Tue Jun  5 
10:33:40 2001
+++ guile/guile-core/examples/box-dynamic-module/box.c  Wed Jun  6 13:14:51 2001
@@ -133,7 +133,8 @@
    second argument.  It will initialize the shared, library, but will
    place the definitions in a module called (box-module), so that an
    additional (use-modules (box-module)) is needed to make them
-   accessible.  */
+   accessible.  In this example, the Scheme file box-module.scm is
+   responsible for doing the load-extension call.  */
 void
 scm_init_box ()
 {