From: "hitesh.jasani@..." <hitesh.jasani@...>
Date: 2006-02-20T06:48:30+09:00
Subject: Re: metakoans.rb (#67)

Here's my solution.  It ends up at 13 lines, as long as you don't mind
one line going past 80 chars.  Kudos to Ara for such an interesting
quiz.

class Module
  def attribute sym, &blk
    name, dval = sym, false
    name, dval = sym.keys.first, sym.values.first if Hash === sym
    if blk
      dval = "def_value_#{sym}".to_sym
      define_method(dval, blk)
    end
    module_eval %( def #{name}; @#{name} ||= #{dval}; end )
    module_eval %( def #{name}=(val); if NilClass === val then @#{name}
= lambda{nil}.call; else @#{name} = val; end; end )
    module_eval %( def #{name}?; @#{name} ? true : false ; end)
  end
end

- Hitesh
http://www.jasani.org/