On Fri, Jan 21, 2011 at 7:17 PM, Oliver Kullmann

>  (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)


Instituto de FĂ­sica Fundamental, CSIC
c/ Serrano, 113b, Madrid 28006 (Spain)
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! 
Ecls-list mailing list

Reply via email to