logand.bm 123 B

1234567
  1. (define bignum (1- (expt 2 128)))
  2. (let* ((i 0))
  3. (benchmark "bignum" 130000
  4. (logand i bignum)
  5. (set! i (+ i 1))))