guile/guile-core/guile-readline readline.scm

[Marius Vollmer]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Marius Vollmer <address@hidden> 01/08/26 14:52:34

Modified files:
        guile-core/guile-readline: readline.scm 

Log message:
        Use load-extension instead of explicit dynamic-link/dynamic-call.
        Removed ".so" extension from library name.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/guile-readline/readline.scm.diff?cvsroot=OldCVS&tr1=1.15&tr2=1.16&r1=text&r2=text

Patches:
Index: guile/guile-core/guile-readline/readline.scm
diff -u guile/guile-core/guile-readline/readline.scm:1.15 
guile/guile-core/guile-readline/readline.scm:1.16
--- guile/guile-core/guile-readline/readline.scm:1.15   Thu Aug  2 12:45:07 2001
+++ guile/guile-core/guile-readline/readline.scm        Sun Aug 26 14:52:33 2001
@@ -35,7 +35,7 @@
 ;;; but only when it isn't already present.
 
 (if (not (feature? 'readline))
-    (dynamic-call "scm_init_readline" (dynamic-link "libguilereadline.so")))
+    (load-extension "libguilereadline" "scm_init_readline"))
 
 (if (not (feature? 'readline))
     (scm-error 'misc-error