Need when runtime device and cffi device is different. diff -rN -u old-cffi/tests/bindings.lisp new-cffi/tests/bindings.lisp --- old-cffi/tests/bindings.lisp 2006-09-25 13:54:24 +0000 +++ new-cffi/tests/bindings.lisp 2006-09-25 13:54:26 +0000 @@ -38,7 +38,8 @@ ;;; ASDF extensions loaded. (defun load-directory () (let ((here #.(or *compile-file-truename* *load-truename*))) - (make-pathname :directory (pathname-directory here)))) + (make-pathname :directory (pathname-directory here) + #+win32 :device #+win32 (pathname-device here)))) #-(:and :ecl (:not :dffi)) (let ((*foreign-library-directories* (list (load-directory)))) -- WBR, Yaroslav Kavenchuk.
On 9/25/06, Yaroslav Kavenchuk <kavenchuk@jenty.by> wrote:
Need when runtime device and cffi device is different.
IIRC, some Lisps use DEVICE others use HOST for the windows drive letter. I've pushed a similar patch that takes that into consideration. It should work. Thanks. -- Luís Oliveira http://student.dei.uc.pt/~lmoliv/
On Mon, 25 Sep 2006 15:16:32 +0100, Luís Oliveira said:
On 9/25/06, Yaroslav Kavenchuk <kavenchuk@jenty.by> wrote:
Need when runtime device and cffi device is different.
IIRC, some Lisps use DEVICE others use HOST for the windows drive letter. I've pushed a similar patch that takes that into consideration. It should work.
The other way is to use :defaults here :name nil :type nil :version nil -- Martin Simmons LispWorks Ltd http://www.lispworks.com/
participants (3)
-
Luís Oliveira -
Martin Simmons -
Yaroslav Kavenchuk