gistfile1.rb

class Array
  def eql_all? &block
    block = lambda {|a|a} unless block
    max=self.length
    i=0
    c = block.( self[i] )
    n = nil
    result = while i+1<max
      n=block.(self[i+1])
      break false unless c == n
      c=n
      i+=1
    end
    result.nil?
  end
end

なるほど、であれば

class Array
  def eql_all?(&block)
    map(&block).uniq.count == 1
  end
end

で良いかもしれませんね、uniqは===比較してくれる気がするので.