This is not a problem with multiple-value-bind. The proclamation for compiled-function-file was wrong. I fixed it today.<div><br></div><div>Juanjo<br><br><div class="gmail_quote">On Fri, Jul 30, 2010 at 7:38 AM, Stas Boukarev <span dir="ltr"><<a href="mailto:stassats@gmail.com">stassats@gmail.com</a>></span> wrote:<br>

<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">Consider the following file:<br>
(defun foo ())<br>
<br>
(defun location (function)<br>
  (multiple-value-bind (file pos) (ext:compiled-function-file function)<br>
    (list file pos)))<br>
<br>
Load it:<br>
> (load (compile-file "foo"))<br>
> (location #'foo)<br>
("foo.lisp" NIL)<br>
> (ext:compiled-function-file #'foo)<br>
"foo.lisp"<br>
0<br>
<br>
--<br>
With Best Regards, Stas.<br>
<br>
------------------------------------------------------------------------------<br>
The Palm PDK Hot Apps Program offers developers who use the<br>
Plug-In Development Kit to bring their C/C++ apps to Palm for a share<br>
of $1 Million in cash or HP Products. Visit us here for more details:<br>
<a href="http://p.sf.net/sfu/dev2dev-palm" target="_blank">http://p.sf.net/sfu/dev2dev-palm</a><br>
_______________________________________________<br>
Ecls-list mailing list<br>
<a href="mailto:Ecls-list@lists.sourceforge.net">Ecls-list@lists.sourceforge.net</a><br>
<a href="https://lists.sourceforge.net/lists/listinfo/ecls-list" target="_blank">https://lists.sourceforge.net/lists/listinfo/ecls-list</a><br>
</blockquote></div><br><br clear="all"><br>-- <br>Instituto de Física Fundamental, CSIC<br>c/ Serrano, 113b, Madrid 28006 (Spain) <br><a href="http://juanjose.garciaripoll.googlepages.com">http://juanjose.garciaripoll.googlepages.com</a><br>


</div>