zucker 5 → 6

data/CHANGELOG

@@ -1,3 +1,11 @@
+2010-10-03 | Zucker 6
+* no new cubes
+* bugfix for OS.posix?
+* small changes + bugfixes + doc improvements
+* added two user methods to Info
+* changed egonil semantics ( using method_missing, see http://rbjl.net/26/catch_nil.rb )
+* bugfix for vv
+
 2010-09-04 | Zucker 5
 * debug edition -  added two debug helpers: oo (output line, method, file) and cc (output method callstack)
 * renamed cube D to dd add added more debug aliases (for mm and binding)

data/Rakefile

@@ -24,20 +24,21 @@ Spec::Rake::SpecTask.new('spec') do |t|
 end
 
 # gem
-PKG_FILES = FileList[ '[a-zA-Z]*', 'lib/**/*' ]
 spec = Gem::Specification.new do |s|
   s.name = 'zucker'
   s.version = Zucker::VERSION
   s.date = Zucker::DATE
-  s.authors = ['Jan Lelis','and many others']
+  s.authors = ['Jan Lelis','and others']
   s.email = 'mail@janlelis.de'
   s.summary = "Sweeten your Ruby code with this syntactic sugar :).
 Adds a lot of little helpers that you do not want to miss again.
 See http://rubyzucker.info"
+  s.description = s.summary
   s.homepage = 'http://rubyzucker.info'
-  s.files = PKG_FILES.to_a
+  s.files = FileList[ '[a-zA-Z]*', 'lib/**/*' ].to_a
   s.require_paths = ["lib"]
   s.required_ruby_version = '>= 1.8.7' # 1.9 recommended
+  s.add_development_dependency 'coderay'
 end
 
 Rake::GemPackageTask.new(spec) do |pkg|

data/lib/zucker.rb

@@ -2,8 +2,8 @@
 
 module Zucker
   # version and date get modified by the :prepare_release rake task
-  VERSION = '5'
-  DATE = '2010-09-04'
+  VERSION = '6'
+  DATE = '2010-10-03'
   
   # cube list
   PACKAGES = {
@@ -65,8 +65,17 @@ module Zucker
       aliases.each{ |old, new|
         Object.class_eval "alias #{new} #{old}; loaded_aliases << :#{new}" rescue nil
       }
-      eval "::RV = RubyVersion; loaded_aliases << :RV" rescue nil
-      eval "::RE = RubyEngine;  loaded_aliases << :RE" rescue nil
+
+      #eval "::RV = RubyVersion; loaded_aliases << :RV" rescue nil
+      (
+         Object.const_set '::RV', RubyVersion
+         loaded_aliases << :RV
+      ) rescue nil
+      #eval "::RE = RubyEngine; loaded_aliases << :RE" rescue nil
+      (
+         Object.const_set '::RE', RubyEngine
+         loaded_aliases << :RE
+      ) rescue nil
       
       loaded_aliases
     end

data/lib/zucker/6/alias_for.rb

@@ -0,0 +1,21 @@
+require 'zucker'
+
+def alias_for(m, *aliases)
+  aliases.each{ |a|
+    class_eval "alias #{a} #{m}"
+  }
+end
+alias aliases_for alias_for
+
+class Module
+  def alias_method_for(m, *alias_methods)
+    alias_methods.each{ |a|
+      class_eval do
+        alias_method a.to_sym, m.to_sym
+      end
+    }
+  end
+  alias alias_methods_for alias_method_for
+end
+
+# J-_-L

data/lib/zucker/6/aliases.rb

@@ -0,0 +1,51 @@
+require 'zucker'
+
+class Object
+  alias is_an? is_a? # thanks to utility_belt
+end
+
+module Enumerable
+  alias with zip
+  alias %    zip
+end
+
+class Array
+  alias ** product
+  alias contains? include?
+end
+
+class String
+  alias contains? include?
+end
+
+class Hash
+  alias + merge
+end
+
+class Binding
+  #alias [] eval
+  def [](expr)
+    self.eval "#{expr}"
+  end
+end
+
+class << File
+  alias filename basename # thanks rdp :)
+end
+
+class << Dir
+  def join(*args)
+    File.join(*args)
+  end
+
+  def split(*args)
+    File.split(*args)
+  end
+end
+
+# constants - who would use these in real-world code for other things?
+Infinity = 1.0 / 0.0 # or 2*Float::MAX or Float::INFINITY
+NaN      = 0.0 / 0.0
+
+# J-_-L
+

data/lib/zucker/6/all.rb

@@ -0,0 +1,4 @@
+require 'zucker'
+Zucker.require_all
+
+# J-_-L

data/lib/zucker/6/array.rb

@@ -0,0 +1,25 @@
+require 'zucker'
+
+class Array
+  def ^(other) # TODO: more efficient
+    (self - other) +
+    (other - self)
+  end
+
+  # can take an argument & block to be Rails compatible
+  def sum(identity = 0, &block)
+    # inject(:+)
+    if block_given?
+      map(&block).sum( identity )
+    else
+      inject(:+) || identity
+    end
+  end
+
+  def chrs
+    self.pack 'C*'
+  end
+end
+
+# J-_-L
+

data/lib/zucker/6/array2proc.rb

@@ -0,0 +1,18 @@
+require 'zucker'
+
+class Array
+  def to_proc
+    Proc.new{ |obj|
+      if self.first.is_a? Array
+        self.inject(obj){ |result, nested_array|
+          nested_array.to_proc.call result
+        }
+      else
+        obj.send *self
+      end
+    }
+  end
+end
+
+# J-_-L
+

data/lib/zucker/6/binding.rb

@@ -0,0 +1,34 @@
+require 'zucker'
+
+class Binding
+  def inspect
+    put_vars = lambda { |array|
+      if array.empty?
+        ' - none'
+      else
+        array.map{|e|
+          val = self.eval "#{e}"
+          val = val.is_a?( Binding ) ? val.to_s : val.inspect
+          " - #{e}: #{ val }"
+        }.join "\n"
+      end
+    }
+
+"#{self.to_s}
+local vars
+#{ put_vars[ self.eval 'local_variables' ] }
+(instance vars)
+#{ put_vars[ self.eval 'instance_variables' ] }
+self
+ - #{self.eval 'self'}
+block_given?
+ - #{self.eval 'block_given?'}"
+
+  end
+end
+
+alias v  binding
+alias vv binding
+
+# J-_-L
+

data/lib/zucker/6/blank.rb

@@ -0,0 +1,28 @@
+require 'zucker'
+
+class Object
+  def blank?
+    if respond_to? :empty? then empty? else !self end
+  end
+
+  def present?
+    !blank?
+  end
+end
+
+
+{ # what to do              # for which classes
+  lambda{ true }         => [FalseClass, NilClass],
+  lambda{ false }        => [TrueClass, Numeric],
+  lambda{ empty? }       => [Array, Hash],
+  lambda{ self !~ /\S/ } => [String],
+  lambda{ self == //   } => [Regexp],
+
+}.each{ |action, klass_array|
+  klass_array.each{ |klass|
+    klass.send :define_method, :blank?, &action
+  }
+}
+
+# J-_-L
+

data/lib/zucker/6/cc.rb

@@ -0,0 +1,25 @@
+require 'zucker'
+
+module Kernel
+  private
+
+  def c(show_irb = false)
+    method_stack = caller.reverse.map{ |m|
+      m.rindex( /:\d+(:in `(.*)')?$/ )
+      $2
+    }.compact
+    
+    if !show_irb && a = method_stack.index( 'irb_binding' )
+      method_stack = [ method_stack[0], '(irb)', *method_stack[a+1..-1] ]
+    end
+
+    # puts method_stack.map.with_index{ |m, i|
+    method_stack.each_with_index{ |m, i|
+      puts "  "*i + m
+    }
+  end
+
+  alias cc c
+end
+
+# J-_-L

data/lib/zucker/6/class2proc.rb

@@ -0,0 +1,12 @@
+require 'zucker'
+
+class Class
+  def to_proc
+    Proc.new do |*args|
+      self.new *args
+    end
+  end
+end
+
+# J-_-L
+

data/lib/zucker/6/control.rb

@@ -0,0 +1,4 @@
+require 'zucker'
+Zucker.require_this __FILE__
+
+# J-_-L

data/lib/zucker/6/dd.rb

@@ -0,0 +1,23 @@
+require 'zucker'
+
+module Kernel
+  def d(*args, &block)
+    if args.empty?
+      tap{
+        if block_given?
+          puts yield self
+        else
+          puts self.inspect
+        end
+      }
+    else
+      raise ArgumentError, ".d - The parser thought that the code after .d are method arguments... Please don't put a space after d or use .d() or .d{} in this case!"
+#      eval ...
+    end
+  end
+
+  alias dd d
+end
+
+# J-_-L
+

data/lib/zucker/6/debug.rb

@@ -0,0 +1,4 @@
+require 'zucker'
+Zucker.require_this __FILE__
+
+# J-_-L

data/lib/zucker/6/default.rb

@@ -0,0 +1,4 @@
+require 'zucker'
+Zucker.require_all
+
+# J-_-L

data/lib/zucker/6/egonil.rb

@@ -0,0 +1,27 @@
+require 'zucker'
+
+# code by Yohan, slightly edited and comments by me
+def egonil(&block)
+  # grip methods
+  ori_method_missing   = NilClass.instance_method(:method_missing)
+  catch_method_missing = NilClass.instance_method(:catch_method_missing)
+  # activate ego mode
+  NilClass.send :define_method, :method_missing, catch_method_missing
+  # run code
+  yield
+ensure
+  # no matter what happens: restore default nil behaviour
+  NilClass.send :define_method, :method_missing, ori_method_missing
+end
+
+# this is the ego nil
+class NilClass
+  def catch_method_missing(m, *args, &block)
+    nil
+  end
+end
+
+alias nn egonil
+
+# J-_-L
+

data/lib/zucker/6/engine.rb

@@ -0,0 +1,68 @@
+require 'zucker'
+
+module RubyEngine
+    # try to guess the interpreter
+    @interpreter = case
+    when RUBY_PLATFORM == 'parrot'
+      'cardinal'
+    when Object.const_defined?(:RUBY_ENGINE)
+      if RUBY_ENGINE == 'ruby'
+        if RUBY_DESCRIPTION =~ /Enterprise/
+          'ree'
+        else
+          'mri'
+        end
+      else
+        RUBY_ENGINE.to_s # jruby, rbx, ironruby, macruby, etc.
+      end
+    else # probably 1.8
+      'mri'
+    end
+
+  class << self
+    def is?(what)
+      what === @interpreter
+    end
+    alias is is?
+
+    def to_s
+      @interpreter.to_s
+    end
+
+    # ask methods
+
+    def mri?
+      RubyEngine.is? 'mri'
+    end
+    alias official_ruby? mri?
+    alias ruby? mri?
+
+    def jruby?
+      RubyEngine.is? 'jruby'
+    end
+    alias java? jruby?
+
+    def rubinius?
+      RubyEngine.is? 'rbx'
+    end
+    alias rbx? rubinius?
+
+    def ree?
+      RubyEngine.is? 'ree'
+    end
+    alias enterprise? ree?
+
+    def ironruby?
+      RubyEngine.is? 'ironruby'
+    end
+    alias iron_ruby? ironruby?
+
+    def cardinal?
+      RubyEngine.is? 'cardinal'
+    end
+    alias parrot? cardinal?
+    alias perl? cardinal?
+  end
+end
+
+# J-_-L

data/lib/zucker/6/enumerable.rb

@@ -0,0 +1,14 @@
+require 'zucker'
+
+module Enumerable
+  def mash
+    ret = {}
+    each{ |kv|
+      ret.store *( yield(kv)[0,2] )
+    }
+    ret
+  end
+end
+
+# J-_-L
+