[Ecls-list] Embedding/ffi question

Seth Burleigh seth at tewebs.com
Sat Jun 26 02:53:41 UTC 2010


Do callbacks work ? -  i tried to compile something with this in it (was
in windows example):

(ffi:defcallback (wndproc-proxy :stdcall)
    :int ((hnd :pointer-void) (umsg :unsigned-int)
(wparam :unsigned-int) (lparam :int))
    (let* ((wndproc 'a))
      (unless wndproc
	(error "Cannot find a registered Windows prodecure for object ~S" hnd))
      (print "HI")))


and received the below. 

;;; Warning:
;;;   in file test.lisp, position 0
;;;   at (DEFCALLBACK (WNDPROC-PROXY STDCALL) ...)
;;;   ! The variable LPARAM is not used.
;;; Warning:
;;;   in file test.lisp, position 0
;;;   at (DEFCALLBACK (WNDPROC-PROXY STDCALL) ...)
;;;   ! The variable WPARAM is not used.
;;; Warning:
;;;   in file test.lisp, position 0
;;;   at (DEFCALLBACK (WNDPROC-PROXY STDCALL) ...)
;;;   ! The variable UMSG is not used.
;;; End of Pass 1.
;;; Note:
;;;   Refusing to propagate C-INLINE
;;; Emitting code for WNDPROC-PROXY.
;;; Warning:
;;;   ! Object found in array but not used
;;; a
;;; Note:
;;;   Invoking external command:
;;;   gcc "-I/usr/local/include/"  -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64
-g -O2 -fPIC  -Dlinux -O2 -w -c "/home/seth/.repo/test.c" -o
"/home/seth/.repo/test.o"
In file included from /home/seth/.repo/test.c:6:
/home/seth/.repo/test.h:42: error: expected ‘=’, ‘,’, ‘;’, ‘asm’ or
‘__attribute__’ before ‘ecl_callback_0’
/home/seth/.repo/test.c:25: error: expected ‘=’, ‘,’, ‘;’, ‘asm’ or
‘__attribute__’ before ‘ecl_callback_0’
/home/seth/.repo/test.c: In function ‘init_fas_CODE’:
/home/seth/.repo/test.c:69: error: ‘ecl_callback_0’ undeclared (first
use in this function)
/home/seth/.repo/test.c:69: error: (Each undeclared identifier is
reported only once
/home/seth/.repo/test.c:69: error: for each function it appears in.)





More information about the ecl-devel mailing list