* libltdl/ltdl.c (shl_close): shl_t was correct here...

(shl_sym): ... but we have to pass the handle by reference here.

diff --git a/ChangeLog b/ChangeLog
index 0e2e1b4597ef73cdf9af8e1990786cb90e94d89e..04ef98bd3ec71972b4e37a95d434b5206a9063eb 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+1999-04-12  John David Anglin  <dave.anglin@nrc.ca>
+
+       * libltdl/ltdl.c (shl_close): shl_t was correct here...
+       (shl_sym): ... but we have to pass the handle by reference here.
+
 1999-04-12  Alexandre Oliva  <oliva@dcc.unicamp.br>
 
        * doc/libtool.texi (Invoking ltconfig): Document environment

diff --git a/libltdl/ltdl.c b/libltdl/ltdl.c
index 00e94450e6fbaf6eeb9f3a107364c15f64b0a162..6b504fcd8f1d0089b681ba9db8d389e49d156722 100644 (file)
--- a/libltdl/ltdl.c
+++ b/libltdl/ltdl.c
@@ -392,7 +392,7 @@ static int
 shl_close (handle)
        lt_dlhandle handle;
 {
-       if (shl_unload((shl_t*) (handle->handle)) != 0) {
+       if (shl_unload((shl_t) (handle->handle)) != 0) {
                last_error = cannot_close_error;
                return 1;
        }
@@ -406,7 +406,7 @@ shl_sym (handle, symbol)
 {
        lt_ptr_t address;
 
-       if (handle->handle && shl_findsym((shl_t*) (handle->handle),
+       if (handle->handle && shl_findsym((shl_t*) &(handle->handle),
            symbol, TYPE_UNDEFINED, &address) == 0)
                if (address)
                        return address;