On Fri, Jan 21, 2011 at 7:17 PM, Oliver Kullmann
wrote:
> (loop while 1 do
> (dolist (p *small-primes*)
> (if (= (mmod n p) 0) (return))
> (if (>= (* p p) n) (return-from next-prime-det n)))
> (incf n (nth (mmod n 210) deltaprimes)))
>
> For whatever reason, ecl doesn't execute the loop.
>
Bug identified. It was a typo in the code that determines the value of a
compiled constant. AFAI can tell, it only affects logical expressions in
which *constant* integers or floats are used as true/false values. I will
produce a patched release soon to fix this (the fix is in CVS and will be
tested tonight)
Juanjo
--
Instituto de Física Fundamental, CSIC
c/ Serrano, 113b, Madrid 28006 (Spain)
http://juanjose.garciaripoll.googlepages.com
--
Special Offer-- Download ArcSight Logger for FREE (a $49 USD value)!
Finally, a world-class log management solution at an even better price-free!
Download using promo code Free_Logger_4_Dev2Dev. Offer expires
February 28th, so secure your free ArcSight Logger TODAY!
http://p.sf.net/sfu/arcsight-sfd2d___
Ecls-list mailing list
Ecls-list@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/ecls-list
