zucker 8 → 9

data/lib/zucker/6/sandbox.rb

@@ -1,25 +0,0 @@
-require 'zucker'
-
-module Kernel
-  private
-
-  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/6/shortcuts.rb

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

data/lib/zucker/6/square_brackets_for.rb

@@ -1,21 +0,0 @@
-require 'zucker'
-
-class Module
-  def square_brackets_for(ivar, assignment = true)
-    #  undef []   if respond_to? :[]
-    #  undef []=  if respond_to? :[]=
-
-    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/6/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/6/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/6/to_proc.rb

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

data/lib/zucker/6/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/6/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/6/version.rb

@@ -1,118 +0,0 @@
-require 'zucker'
-require 'date'
-require 'time'
-
-module RubyVersion
-  class << self
-    def to_s
-      RUBY_VERSION
-    end
-
-    # comparable
-    def <=>(other)
-      value = case other
-        when Integer
-          RUBY_VERSION.to_i
-        when Float
-          RUBY_VERSION.to_f
-        when String
-          RUBY_VERSION
-        when Date, Time
-          other.class.parse(RUBY_RELEASE_DATE)
-        else
-          other = other.to_s
-          RUBY_VERSION
-        end
-      value <=> other
-    end
-    include Comparable
-
-    # chaining for dsl-like language
-    def is?(other = nil)
-      if other
-        RubyVersion == other
-      else
-        RubyVersion
-      end
-    end
-    alias is is?
-
-    # aliases
-    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?
-
-    # compare dates
-    def newer_than(other)
-      if other.is_a? Date or other.is_a? Time
-        RubyVersion > other
-      else
-        RUBY_RELEASE_DATE > other.to_s
-      end
-    end
-    alias newer_than? newer_than
-
-    def older_than(other)
-      if other.is_a? Date or other.is_a? Time
-        RubyVersion < 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
-
-    # 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
-  end
-end
-
-# J-_-L

data/lib/zucker/7/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/7/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/7/all.rb

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

data/lib/zucker/7/array.rb

@@ -1,25 +0,0 @@
-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/7/array2proc.rb

@@ -1,18 +0,0 @@
-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/7/binding.rb

@@ -1,34 +0,0 @@
-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
-