I have done some further investigation and your code works with ECL as of git/CVS.<div><br></div><div>First of all I removed the finalization queue in ECL, as it seems that newer versions of the collector invoke the finalizers in a safe environment. Second, I executed your code with the following result<div>

<br></div><div><div>;;; Loading "/Users/jjgarcia/build/ecl/foo.fas"</div><div>;; allocated foreign object #<foreign :VOID 00500580></div><div>;;; Larger 10 object case</div><div>;; allocated foreign object #<foreign :VOID 00500590></div>

<div>;; allocated foreign object #<foreign :VOID 005005b0></div><div>;; allocated foreign object #<foreign :VOID 005005d0></div><div>;; allocated foreign object #<foreign :VOID 005005f0></div><div>;; allocated foreign object #<foreign :VOID 00500610></div>

<div>;; allocated foreign object #<foreign :VOID 00500630></div><div>;; allocated foreign object #<foreign :VOID 00500650></div><div>;; allocated foreign object #<foreign :VOID 00500670></div><div>;; allocated foreign object #<foreign :VOID 00500690></div>

<div>;; allocated foreign object #<foreign :VOID 005006b0></div><div>;; freeing foreign object #<foreign VOID 00500580></div><div>#P"/Users/jjgarcia/build/ecl/foo.fas"</div><div>NIL</div><div>NIL</div>

<div>> (si::gc t)</div><div><br></div><div>;; freeing foreign object #<foreign VOID 00500690></div><div>;; freeing foreign object #<foreign VOID 005006b0></div><div>;; freeing foreign object #<foreign VOID 00500590></div>

<div>;; freeing foreign object #<foreign VOID 005005b0></div><div>;; freeing foreign object #<foreign VOID 005005d0></div><div>;; freeing foreign object #<foreign VOID 005005f0></div><div>;; freeing foreign object #<foreign VOID 00500610></div>

<div>;; freeing foreign object #<foreign VOID 00500630></div><div>;; freeing foreign object #<foreign VOID 00500650></div><div>;; freeing foreign object #<foreign VOID 00500670></div><div><br></div><div>

Note that I replaced your printf() with a FORMAT. No problem here. Second, finalization is not guaranteed to happen when you call SI:GC because the garbage collector may still have references to the objects. In this case even though the functions and code that create the variables have exited, there may be dangling references in the stack and it is only when I type (SI:GC T) at the prompt, once the compiled code has finished, that the collector feels free to reclaim and finalize the objects.</div>

<div><br></div><div>This is not a bug. Finalization is not a safe thing and it is not reliable in the sense that you can predict when it is going to happen. It has to be used only as a last resort to prevent resource leakage and is no substitute for clever, well thought handling of those resources.</div>
<div><br></div><div>Juanjo</div><br>-- <br>Instituto de Física Fundamental, CSIC<br>c/ Serrano, 113b, Madrid 28006 (Spain) <br><a href="http://tream.dreamhosters.com" target="_blank">http://tream.dreamhosters.com</a><br>
</div>
</div>