[ruby-dev:11410] Re: [PATCH] an analogue of `long long'

田中です

>From: [e-mail] (Yukihiro Matsumoto)
>Subject: [ruby-dev:11391] Re: [PATCH] an analogue of `long long'

> と思ったのですが、この部分、乗算・除算を行っていたのを左右ビッ
> トシフトに置き換えたら、かなり速くなりました。やはり人の意見
> には耳を傾けた方が良いようです。^^;;;

あらら、そうですか。私がおかしいのかな。

> randomな方のテストスクリプトください。[ruby-dev:11391]に書い
> た私の実装でも試してみますから。

以下のスクリプトです。

--- ここから

def bigrand(n)
  n = rand(64)+n
  m = n%32
  a = rand(2**m)
  n -= m;
  max = 2**32-1
  while n>0
    a <<= 32;
    a  |= rand(max);
    n  -= 32;
  end
  a
end

sz = 1000
a = Array.new(sz)
b = Array.new(sz)
#srand 0

(0...sz).each {|i|
  a[i] = bigrand(1024);
  b[i] = bigrand(256);
}

start = Time.now
(0...sz).each {|i|
  aa=a[i]; bb=b[i]
  100.times { c,d = aa.divmod bb }
  #c,d = a[i].divmod b[i]
  #if d >= b[i] || a[i] != c*b[i]+d
  #  printf "%i.divmod(%i) = %i, %i\n", a[i], b[i], c, d
  #  printf "c*b+d = %i\n", c*b[i]+d
  #end
}
printf "  Time = %8.3f s\n", (Time.now - start).to_f

--- ここまで


* Sun Ultra 10, gcc 2.95.2 で走らせた結果:

# 変更前
% ./ruby bigdiv.rb
  Time =    7.517 s

# 変更後
% ./ruby bigdiv.rb
  Time =    7.313 s


田中昌宏