<br><div><span class="gmail_quote">2006/6/26, Luís Oliveira <<a href="mailto:luismbo@gmail.com" target="_blank" onclick="return top.js.OpenExtLink(window,event,this)">luismbo@gmail.com</a>>:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">

On 2006-jun-26, at 14:15, Juan Jose Garcia Ripoll wrote:<br>>>    ;;; Loading "/Users/luis/src/cffi/tests/bindings.fas"<br>>>    No dispatch function defined for character #\<.<br>>>    Broken at LAMBDA.
<br>><br>> You probably used an old ECL. Our implementation can compile files<br>> with almost any kind of lisp object thanks to some patches contributed by<br>> Brian Spilsbury.<br><br>Just to make sure, I did a "make clean", "cvs up" (again) rebuilt ECL
</blockquote><div><br>Do you use the sources from <a href="http://common-lisp.net">common-lisp.net</a>? Or the older tree (abandoned due to CVS problems) in <a href="http://sourceforge.net">sourceforge.net</a>?<br></div>
<br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">from scratch and tried again. I still get the same error. Did you try<br>to load the cffi-tests test suite?
</blockquote></div><br>Yes, and indeed I found several bugs in CFFI.<br><br>1) You want to use load-foreign-module when loading shared libraries.
<br>2) The flags you pass for building the shared library produce an invalid executable on RedHat 9.0.<br>3) DEFCVAR uses DEFINE-SYMBOL-MACRO without encapsulating it in an EVAL-WHEN form. This breaks bindings.lisp.<br><br clear="all">

Apart from that, and from the fact that your tests files include functions with too many arguments (ECL is restricted to 64 required arguments, but this could be changed, probably), things run ok here.<br><br>Did you also remove al FAS files from CFFI? They typically become incompatible from version to version.
<br><br>Juanjo<br><br>-----<br><br>Using ECL from CVS (repository in common-lisp.net!!!) I just type<br><br>(require 'asdf)<br>(require 'rt)<br>(asdf::operate 'asdf:load-source-op "cffi")<br>(load "cffi-tests.asd
")<br>(asdf:operate 'asdf:load-op "cffi-tests")<br><br><br><br>