From 7db6f0810fa1ac9bb007026a46e62efa15b9bcf0 Mon Sep 17 00:00:00 2001
From: jjgarcia <jjgarcia>
Date: Sun, 24 Aug 2008 00:04:37 +0000
Subject: [PATCH] SI:LOAD-FOREIGN-MODE does not apply TRUENAME on its argument

---
 src/CHANGELOG | 4 ++++
 src/c/ffi.d   | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/src/CHANGELOG b/src/CHANGELOG
index fe79cfd66..c8304390e 100644
--- a/src/CHANGELOG
+++ b/src/CHANGELOG
@@ -47,6 +47,10 @@ ECL 0.9l-p1:
    defined in the C core and caused an error when used; second, if the output
    stream was missing or directed to the standard output, it would fail.
 
+ - SI:LOAD-FOREIGN-MODULE does not coerce the library name to a truename
+   before loading. Instead, it leaves this task to the appropriate routine,
+   dlopen or similar.
+
 ;;; Local Variables: ***
 ;;; mode:text ***
 ;;; fill-column:79 ***
diff --git a/src/c/ffi.d b/src/c/ffi.d
index 5b9b6f6ae..9d33ff303 100644
--- a/src/c/ffi.d
+++ b/src/c/ffi.d
@@ -418,7 +418,7 @@ si_load_foreign_module(cl_object filename)
 	cl_object output;
 	int i;
 
-	filename = cl_namestring(cl_truename(filename));
+	filename = cl_coerce_to_filename(filename);
 
 #ifdef ECL_THREADS
 	mp_get_lock(1, ecl_symbol_value(@'mp::+load-compile-lock+'));