X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=OPTIMIZATIONS;h=6eed38079e71691fd84c2691b3d1d71a851e7f55;hb=286cb407fcf618572b874ace57c119fe284d14c5;hp=7c51f473ac7e0301e123fa41db6094598db835d1;hpb=8f4ef01b8c9930d7dd0a56a96845a6d84ca5774d;p=sbcl.git diff --git a/OPTIMIZATIONS b/OPTIMIZATIONS index 7c51f47..6eed380 100644 --- a/OPTIMIZATIONS +++ b/OPTIMIZATIONS @@ -169,3 +169,11 @@ then cons up a bignum for it: ((89 125 16) (ASH A (MIN 18 -706))) (T (DPB -3 (BYTE 30 30) -1)))) -------------------------------------------------------------------------------- +#16 +(do ((i 0 (1+ i))) + ((= i (the (integer 0 100) n))) + ...) + +It is commonly expected for Python to derive (FIXNUMP I). (If ``='' is +replaced with ``>='', Python will do.) +--------------------------------------------------------------------------------