From: Greg <webs.dev@...>
Date: 2007-06-28T14:50:12+09:00
Subject: RCR: hybrid case expression

I always use a case expression with the target/comparison style, but
sometimes I find myself wanting to put in a condition. For example:

  while( arg=args.shift )
    case arg[0,2]
    when /^-.$/ then short_opts.push arg[1..-1]
    when (arg == "--foo")   then bar()  # cannot do this, except with
below modifications
    when "--"    then long_opts.push arg[2..-1]
    else other_args.push arg
    end
  end

It would be great if this was built into the language.  If other
people are interested, perhaps I will write an RCR.  Otherwise this
can actually be implemented now fairly easily now.

module BooleanCaseCompare
  def self.included( into )
    alias_method :__old_case_compare__, :===
  end

  def ===( other )
    if other.is_a? TrueClass or other.is_a? FalseClass
      __old_case_compare__( other )
    else
      self
    end
  end
end

class TrueClass;  include BooleanCaseCompare end
class FalseClass; include BooleanCaseCompare end