gistfile1.rb

# [ UIViewController, UIView, etc. ]...

[ UIViewController ].each do |klass|
  klass.class_eval do
    def self.allocWithZone(zone)
      super.tap do |x|
        p " +   alloc! #{x.inspect}"
      end
    end
    alias_method 'old_dealloc', 'dealloc'
    def dealloc
      p " - dealloc! #{self.inspect}"
      old_dealloc
    end
  end
end