From: Shin-ichro Hara <sinara@...>
Date: 1998-11-26T17:04:09+09:00
Subject: [ruby-list:11068] Re: enumerable.rb

原です。

In message "[ruby-list:11043] enumerable.rb"
    on 98/11/25, Shin-ichro Hara <sinara@blade.nagaokaut.ac.jp> writes:

|Enumerable モジュールを書いてみました。Enumerable は組み込み
|で既に存在するので、これ自体は無用のもの。:-)

しまった、_qsort_i を定義し忘れていた。(^^;

  def _qsort_i(a, first, last)
    x = a[(first + last)/2]
    i, j = first, last
    loop do
      i+=1 while yield(a[i], x) < 0
      j-=1 while yield(x, a[j]) < 0
      break if i >= j
      a[i], a[j] = a[j], a[i]
      i+=1
      j-=1
    end
    _qsort(a, first, i-1) if first < i-1
    _qsort(a, j+1, last) if j+1 < last
  end

  private :_qsort_i