Hello, CLISP 2.41 gives me the following:
;; Loading file /home/sky/.sbcl/site/usocket-0.3.5/backend/clisp.fas ...
** - Continuable Error
FFI::FIND-FOREIGN-FUNCTION: foreign function "gethostname" does not exist
Changing backend/clisp.lisp thus (in pseudo-diff format):
(FFI:DEF-CALL-OUT get-host-name-internal
(:name "gethostname")
(:arguments (name (FFI:C-PTR (FFI:C-ARRAY-MAX ffi:character
256))
:OUT :ALLOCA)
(len ffi:int))
#+win32 (:library "WS2_32")
+ #+unix (:library "libc.so.6")
(:language #-win32 :stdc
#+win32 :stdc-stdcall)
(:return-type ffi:int))
helps on my system.
Is there some rationale behind the non-working code?
And is there a particular reason that usocket doesn't use CFFI?
Thanks! :)
Leslie
pgp9Tvw6EC7f6.pgp
Description: PGP signature
_______________________________________________ usocket-devel mailing list usocket-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/usocket-devel
