Please find attached two variations of the same test, which is to invoke the EnumWindows Win32 API with a callback that simply prints a message confirming that it was called (which occurs once for each top-level window).
After loading either of these files, run (callback-test) to execute the test. stdcall-test-clisp.lisp uses the CLISP FFI. Note that it specifies :stdc-stdcall as the calling convention. This test executes correctly as expected. stdcall-test-cffi.lisp is the same but written in CFFI terms, except that stdcall is not available. This variant will crash clisp -- although circumstances may vary, so you probably need to execute (callback-test) in a loop to be sure. -- Jack Unrue
stdcall-test-cffi.lisp
Description: Binary data
stdcall-test-clisp.lisp
Description: Binary data
_______________________________________________ cffi-devel mailing list cffi-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/cffi-devel
