zucker 8 → 9

data/lib/zucker/4/not.rb

@@ -1,19 +0,0 @@
-require 'zucker'
-
-class Object
-  def not
-    NotClass.new self
-  end
-
-  class NotClass < BasicObject
-    def initialize(receiver)
-      @receiver = receiver
-    end
-    
-    def method_missing(m, *args, &block)
-      not @receiver.public_send( m, *args, &block )
-    end
-  end
-end
-
-# J-_-L

data/lib/zucker/4/os.rb

@@ -1,50 +0,0 @@
-require 'zucker'
-
-require 'rbconfig'
-
-module OS
-  class << OS
-    def is?(what)
-      what === RbConfig::CONFIG['host_os']
-    end
-    alias is is?
-
-    def to_s
-      RbConfig::CONFIG['host_os']
-    end
-  end
-
-  module_function
-
-  def linux?
-    OS.is? /linux|cygwin/
-  end
-
-  def mac?
-    OS.is? /mac|darwin/
-  end
-
-  def bsd?
-    OS.is? /bsd/
-  end
-
-  def windows?
-    OS.is? /mswin|win|mingw/
-  end
-
-  def solaris?
-    OS.is? /solaris|sunos/
-  end
-
-  def posix?
-    linux? or mac? or bsd? or solaris? or Process.respond_to?(:fork)
-  end
-
-  #def symbian?
-    #TODO who knows what symbian returns?
-  #end
-
-  # ...
-end
-
-# J-_-L

data/lib/zucker/4/q.rb

@@ -1,7 +0,0 @@
-require 'zucker'
-
-module Kernel
-  def q(*args)
-    puts args.map( &:inspect ).join '  '
-  end
-end

data/lib/zucker/4/regexp2proc.rb

@@ -1,12 +0,0 @@
-require 'zucker'
-
-class Regexp
-  def to_proc
-    proc do |e|
-      e.to_s[self]
-    end
-  end
-end
-
-# J-_-L
-

data/lib/zucker/4/sandbox.rb

@@ -1,23 +0,0 @@
-require 'zucker'
-
-module Kernel
-  def sandbox(rescueblock_or_default=nil)
-    Thread.start do
-      $SAFE = 4
-      yield
-    end.value
-  rescue SecurityError => e
-    if !rescueblock_or_default.nil?
-      if rescueblock_or_default.is_a? Proc
-        rescueblock_or_default.call e
-      else
-        rescueblock_or_default
-      end
-    else
-      raise e
-    end
-  end
-end
-
-# J-_-L
-

data/lib/zucker/4/square_brackets_for.rb

@@ -1,22 +0,0 @@
-require 'zucker'
-
-def square_brackets_for(ivar, assignment = true)
-#  undef []   if respond_to? :[]
-#  undef []=  if respond_to? :[]=
-
-#instance_eval do
-  define_method :[] do |key|
-    (instance_variable_get :"@#{ivar}")[key]
-  end
-
-  if assignment
-    define_method :[]= do |key, value|
-      (instance_variable_get :"@#{ivar}")[key] = value
-    end
-  end
-#end
-
-end
-
-# J-_-L
-

data/lib/zucker/4/string.rb

@@ -1,54 +0,0 @@
-require 'zucker'
-
-class String
-  def -(rem)
-    gsub( Regexp === rem ? rem : rem.to_s, '' )
-  end
-
-  def ^(pos)
-    pos = pos.to_i
-    if pos >= 0
-      self[pos..-1]
-    else
-      self[0...pos]
-    end
-  end
-
-  def lchomp(arg = $/)
-    reverse.chomp(arg).reverse
-  end
-
-  def lchomp!(arg = $/)
-    reverse.chomp!(arg).reverse
-  end
-
-  def ords
-    unpack 'C*'
-   # bytes.to_a
-  end
-
-  def constantize(default_value = nil) # always uses global scope as in AS... is this good?
-    get_constant = lambda{
-      self.split(/::/).inject( Object ){ |base_constant, current_constant|
-        base_constant.const_get current_constant
-      }      
-    }
-
-    if !default_value && !block_given?
-      get_constant.call
-    else
-      begin
-        get_constant.call
-      rescue NameError
-        if block_given?
-          yield self
-        else
-          default_value
-        end
-      end
-    end
-  end
-end
-
-# J-_-L
-

data/lib/zucker/4/tap.rb

@@ -1,11 +0,0 @@
-require 'zucker'
-
-def tap_on(obj, &block)
-  obj.tap &block
-end
-
-def make_new(what, *args, &block)
-  what.new(*args).tap &block
-end
-
-# J-_-L

data/lib/zucker/4/unary.rb

@@ -1,24 +0,0 @@
-require 'zucker'
-
-class String
-  def +@
-    self
-  end
-
-  def -@
-    to_sym
-  end
-end
-
-class Symbol
-  def +@
-    to_s
-  end
-
-  def -@
-    self
-  end
-end
-
-# J-_-L
-

data/lib/zucker/4/union.rb

@@ -1,16 +0,0 @@
-require 'zucker'
-
-class Regexp
-  def |(arg)
-    Regexp.union self, arg.is_a?(Regexp) ? arg : arg.to_s
-  end
-end
-
-class String
-  def |(arg)
-    Regexp.union self, arg.is_a?(Regexp) ? arg : arg.to_s
-  end
-end
-
-# J-_-L
-

data/lib/zucker/4/version.rb

@@ -1,115 +0,0 @@
-require 'zucker'
-
-module RubyVersion
-  class << self
-    def to_s
-      RUBY_VERSION
-    end
-
-    def is?(other_version = nil)
-      compare other_version
-    end
-    alias is is?
-
-    # accessors
-
-    def major
-      RUBY_VERSION.to_i
-    end
-    alias main major
-
-    def minor
-      RUBY_VERSION.split('.')[1].to_i
-    end
-    alias mini minor
-
-    def tiny
-      RUBY_VERSION.split('.')[2].to_i
-    end
-    alias teeny tiny
-
-    def patchlevel
-      RUBY_PATCHLEVEL
-    end
-
-    def platform
-      RUBY_PLATFORM
-    end
-
-    def release_date
-      Date.parse RUBY_RELEASE_DATE
-    end
-    alias date release_date
-
-    def description
-      RUBY_DESCRIPTION
-    end
-
-  private
-
-    def compare(other_version)
-      case other_version
-      when nil
-        matcher
-      when Float
-        other_version == RUBY_VERSION.to_f
-      else
-        other_version.to_s == RUBY_VERSION
-      end
-    end
-
-
-    def matcher
-      return @ruby if @ruby
-
-      @ruby = RUBY_VERSION.dup
-      @ruby.instance_eval do
-        alias below     <
-        alias below?    <
-        alias at_most   <=
-        alias at_most?  <=
-        alias above     >
-        alias above?    >
-        alias at_least  >=
-        alias at_least? >=
-        alias exactly   ==
-        alias exactly?  ==
-        def not(other)
-          self != other
-        end
-        alias not?     not
-        alias between between?
-
-        def newer_than(other)
-          case other.class
-          when Date, Time
-            other.class.parse(RUBY_RELEASE_DATE) > other
-          else
-            RUBY_RELEASE_DATE > other.to_s
-          end
-        end
-        alias newer_than? newer_than
-
-        def older_than(other)
-          case other.class
-          when Date, Time
-            other.class.parse(RUBY_RELEASE_DATE) < other
-          else
-            RUBY_RELEASE_DATE < other.to_s
-          end
-        end
-        alias older_than? older_than
-
-        def released_today
-          RubyVersion.date == Date.today
-        end
-        alias released_today? released_today
-      end
-
-      @ruby.freeze
-    end
-
-  end
-end
-
-# J-_-L

data/lib/zucker/5/alias_for.rb

@@ -1,21 +0,0 @@
-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/5/aliases.rb

@@ -1,51 +0,0 @@
-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/5/all.rb

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