zucker 6 → 7

data/CHANGELOG

@@ -1,3 +1,7 @@
+2010-10-03 | Zucker 7
+* fixed critical OS.windows? bug
+
+
 2010-10-03 | Zucker 6
 * no new cubes
 * bugfix for OS.posix?
@@ -6,6 +10,7 @@
 * 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

@@ -83,6 +83,5 @@ task 'release' => %w[gem] do
   `git push origin master --tags`
   last_gem = Dir['pkg/zucker-*.gem'].sort[-1] # TODO better sorting or date for zucker-10
   exit if last_gem =~ /next/ # some error happened, do not pollute rubygems.org
-  puts last_gem
-  #`gem push pkg/#{last_gem}`
+  puts "gem push pkg/#{last_gem}"
 end

data/lib/zucker.rb

@@ -2,7 +2,7 @@
 
 module Zucker
   # version and date get modified by the :prepare_release rake task
-  VERSION = '6'
+  VERSION = '7'
   DATE = '2010-10-03'
   
   # cube list

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

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

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

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

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

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

data/lib/zucker/7/default.rb

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

data/lib/zucker/7/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/7/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/7/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
+

data/lib/zucker/7/env.rb

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

data/lib/zucker/7/extensions.rb

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

data/lib/zucker/7/hash.rb

@@ -0,0 +1,27 @@
+require 'zucker'
+
+class Hash
+  def self.zip(keys,values)
+    Hash[ *keys.zip( values ).flatten ]
+  end
+
+  def <<(other)
+    case
+    when other.is_a?(Hash)
+      merge! other
+    when other.is_a?(Enumerable) || other.respond_to?(:to_splat)
+      merge! Hash[*other]
+    else
+      raise TypeError, 'can only append other Hashs and Enumerables (or Classes that implement to_splat)'
+    end
+  end
+
+  def &(other)
+    Hash[ *select{ |k,v|
+      other[k] == v
+    }.flatten ]
+  end
+end
+
+# J-_-L
+

data/lib/zucker/7/hash2proc.rb

@@ -0,0 +1,16 @@
+require 'zucker'
+
+class Hash
+  def to_proc
+    Proc.new{ |obj|
+      if self.member? obj
+        self[obj].to_proc.call obj
+      else
+        obj
+      end
+    }
+  end
+end
+
+# J-_-L
+

data/lib/zucker/7/info.rb

@@ -0,0 +1,192 @@
+require 'zucker'
+require 'rbconfig'
+require 'etc'
+
+module Info
+  class << self
+    # hash like access
+    def [](what)
+      send what
+    end
+
+    # list available info methods
+    def list
+      singleton_methods - [:[], :list, '[]', 'list']
+    end
+  end
+
+  module_function
+
+  # input
+  def last_input_file
+    $FILENAME
+  end
+
+  def last_input_line_number
+    $.
+  end
+
+  def last_input
+    $_
+  end
+
+  # program
+  def program_name
+    $0
+  end
+
+  def program_arguments
+    $:
+  end
+
+  def loaded_programs
+    $"
+  end
+
+  def program_data
+    ::DATA
+  end
+
+  def child_program_status
+    $CHILD_STATUS
+  end
+
+  # system info
+  def environment
+    ::ENV
+  end
+  alias env environment
+
+  def working_directory
+    Dir.pwd
+  end
+
+  def platform
+    ::RUBY_PLATFORM
+  end
+
+  def os
+    RbConfig::CONFIG['host_os']
+  end
+
+  def process_id
+    $$
+  end
+
+  def load_path
+    $:
+  end
+
+  # user
+  def user_login
+    Etc.getlogin
+  end
+
+  def user_name
+    Etc.getpwnam(user_login).gecos.split(',')[0]
+  end
+
+  # current
+
+  def current_file #  __FILE__
+    return $` if caller[0].rindex(/:\d+(:in `.*')?$/)
+  end
+
+  def current_file_directory
+    if current_file[0,1] == '(' && current_file[-1,1] == ')'
+      current_file
+    else
+      File.dirname(current_file)
+    end
+  end
+
+  def current_line # __LINE__
+    return $1.to_i if caller[0].rindex( /:(\d+)(:in `.*')?$/ )
+  end
+
+  def current_method # __method__ (except aliases)
+    return $1.to_sym if caller(1)[0].rindex( /\`([^\']+)\'/ )
+  end
+
+  def current_callstack
+    caller
+  end
+
+  # dealing with strings
+  def gets_separator
+    $/
+  end
+
+  def join_separator
+    $,
+  end
+
+  def print_separator
+    $,
+  end
+
+  def split_separator
+    $;
+  end
+
+  # misc
+  def security_level
+    $SAFE
+  end
+
+  def warnings_activated?
+    $VERBOSE
+  end
+
+  def debug_activated?
+    $DEBUG
+  end
+
+  def last_exception
+    $!
+  end
+
+  # defined objects
+  def global_variables
+    Object.send :global_variables
+  end
+
+  def global_constants
+    Object.constants
+  end
+
+  # encoding (1.9)
+  #def source_encoding
+  #  __ENCODING__
+  #end
+
+  def external_encoding
+    Encoding.default_external
+  end
+
+  def internal_encoding
+    Encoding.default_internal
+  end
+
+  # ruby version info
+  def ruby_version # also see the RubyVersion cube
+    ::RUBY_VERSION
+  end
+
+  def ruby_patchlevel
+    ::RUBY_PATCHLEVEL
+  end
+
+  def ruby_description
+    ::RUBY_DESCRIPTION
+  end
+
+  def ruby_release_date
+    ::RUBY_RELEASE_DATE
+  end
+
+  def ruby_engine # warning! not support by every implementation. It's saver to use the RubyEngine cube
+    ::RUBY_ENGINE
+  end
+end
+

data/lib/zucker/7/iterate.rb

@@ -0,0 +1,27 @@
+require 'zucker'
+
+def iterate(*params)
+  # params.shift.zip(*params).each{ |*elements| yield *elements }
+  raise ArgumentError, "wrong number of arguments (0)" if params.empty?
+
+  first = params.shift
+  if params.empty? # single param - like each
+    if block_given?
+      first.map{|e| yield e }
+    else
+      first.map.to_enum
+    end
+  else # multiple params
+    max_size = [first, *params].max_by(&:count).size
+    padded_first = first.to_a + [nil]*(max_size - first.count)  # append nils
+    obj = padded_first.zip *params
+    if block_given?
+      obj.map{|es| yield *es }
+    else
+      obj.map.to_enum
+    end
+  end
+end
+
+# J-_-L
+

data/lib/zucker/7/ivars.rb

@@ -0,0 +1,28 @@
+require 'zucker'
+
+def instance_variables_from(obj, *only)
+  iter =
+  if    obj.is_a? Binding
+    obj.eval('local_variables').map{|e| [obj.eval("#{e}"), e] }
+  elsif obj.is_a? Hash
+    obj.map{|k,v| [v,k] }
+  else
+#  elsif obj.is_a? Enumerable
+    obj.each.with_index
+  end
+
+  ret = []
+  iter.each{ |value, arg|
+    arg = arg.to_s
+    if only.include?(arg) || only.include?(arg.to_sym) || only.empty?
+      arg = '_' + arg  if (48..57).member? arg.unpack('C')[0]  # 1.8+1.9
+      ret << ivar = :"@#{arg}"
+      self.instance_variable_set ivar, value
+    end
+  }
+  ret
+end
+alias ivars instance_variables_from
+
+# J-_-L
+

data/lib/zucker/7/kernel.rb

@@ -0,0 +1,34 @@
+require 'zucker'
+
+module Kernel
+  private
+
+  def activate_warnings!
+    $VERBOSE = true
+  end
+
+  def deactivate_warnings!
+    $VERBOSE = false
+  end
+
+  def library?
+    caller[0].rindex(/:\d+(:in `.*')?$/)
+    $PROGRAM_NAME != $` # __FILE__
+  end
+
+  def executed_directly?
+    caller[0].rindex(/:\d+(:in `.*')?$/)
+    $PROGRAM_NAME == $` # __FILE__
+  end
+  alias standalone? executed_directly?
+
+  def irb?
+    !!(( IRB and $0 == 'irb' ) rescue nil)
+  end
+
+  def ignore_sigint! # ctrl+c
+     Signal.trap *%w|SIGINT IGNORE|
+  end
+end
+
+# J-_-L

data/lib/zucker/7/mcopy.rb

@@ -0,0 +1,10 @@
+require 'zucker'
+
+class Object
+  def mcopy
+    Marshal.load Marshal.dump self
+  end
+end
+
+# J-_-L
+

data/lib/zucker/7/mm.rb

@@ -0,0 +1,34 @@
+require 'zucker'
+
+module Kernel
+  def m(levels = 1)
+    if self.is_a? Module
+      klass, method_function = self, :public_methods
+    else
+      klass, method_function = self.class, :public_instance_methods
+
+      eigen = self.singleton_methods
+      if !eigen.empty?
+        puts :Eigenclass # sorry for not being up to date, I just love the word
+        p self.singleton_methods
+      end
+    end
+
+    levels.times{ |level|
+      if cur = klass.ancestors[level]
+        p cur                               # put class name
+        p cur.send method_function, false   # put methods of the class
+      else
+        break
+      end
+    }
+
+    self # or whatever
+  end
+
+  alias mm          m
+  alias method_list m
+end
+
+# J-_-L
+

data/lib/zucker/7/not.rb

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

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

data/lib/zucker/7/oo.rb

@@ -0,0 +1,17 @@
+require 'zucker'
+
+module Kernel
+  private
+
+  def o(desc = nil)
+    caller[0].rindex( /:(\d+)(:in (`.*'))?$/ )
+    m = $3 ? "method #$3, " : ""
+    d = desc ? "#{desc}: r" : 'R'
+
+    puts "#{d}eached #{m}line #$1 of file #$`"
+    # [$`, $1.to_i, $3.to_sym,  desc]
+  end 
+  alias oo o
+end
+
+# J-_-L

data/lib/zucker/7/os.rb

@@ -0,0 +1,54 @@
+require 'zucker'
+require 'rbconfig'
+
+module OS
+  class << self
+    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|mingw/ )
+  end
+
+  def solaris?
+    OS.is?( /solaris|sunos/ )
+  end
+
+  def posix?
+    linux? or mac? or bsd? or solaris? or begin 
+        fork do end
+        true
+      rescue NotImplementedError, NoMethodError
+        false
+      end
+  end
+
+  #def symbian?
+    #TODO who knows what symbian returns?
+  #end
+
+  # ...
+end
+
+# J-_-L

data/lib/zucker/7/qq.rb

@@ -0,0 +1,12 @@
+require 'zucker'
+
+module Kernel
+  private
+
+  def q(*args)
+    puts args.map( &:inspect )*'  ' unless args.empty?
+  end
+  alias qq q
+end
+
+# J-_-L

data/lib/zucker/7/regexp2proc.rb

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

data/lib/zucker/7/sandbox.rb

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

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

data/lib/zucker/7/square_brackets_for.rb

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

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

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

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

data/lib/zucker/7/unary.rb

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

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

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

@@ -28,7 +28,7 @@ module OS
   end
 
   def windows?
-    OS.is?( /mswin|win|mingw/ )
+    OS.is?( /mswin|mingw/ )
   end
 
   def solaris?

metadata

@@ -3,8 +3,8 @@ name: zucker
 version: !ruby/object:Gem::Version 
   prerelease: false
   segments: 
-  - 6
-  version: "6"
+  - 7
+  version: "7"
 platform: ruby
 authors: 
 - Jan Lelis
@@ -130,6 +130,47 @@ files:
 - lib/zucker/iterate.rb
 - lib/zucker/egonil.rb
 - lib/zucker/mcopy.rb
+- lib/zucker/7/default.rb
+- lib/zucker/7/qq.rb
+- lib/zucker/7/all.rb
+- lib/zucker/7/string.rb
+- lib/zucker/7/sandbox.rb
+- lib/zucker/7/regexp2proc.rb
+- lib/zucker/7/ivars.rb
+- lib/zucker/7/dd.rb
+- lib/zucker/7/class2proc.rb
+- lib/zucker/7/enumerable.rb
+- lib/zucker/7/alias_for.rb
+- lib/zucker/7/control.rb
+- lib/zucker/7/unary.rb
+- lib/zucker/7/hash.rb
+- lib/zucker/7/hash2proc.rb
+- lib/zucker/7/tap.rb
+- lib/zucker/7/blank.rb
+- lib/zucker/7/not.rb
+- lib/zucker/7/array2proc.rb
+- lib/zucker/7/info.rb
+- lib/zucker/7/array.rb
+- lib/zucker/7/binding.rb
+- lib/zucker/7/extensions.rb
+- lib/zucker/7/mm.rb
+- lib/zucker/7/oo.rb
+- lib/zucker/7/aliases.rb
+- lib/zucker/7/to_proc.rb
+- lib/zucker/7/iterate.rb
+- lib/zucker/7/egonil.rb
+- lib/zucker/7/mcopy.rb
+- lib/zucker/7/shortcuts.rb
+- lib/zucker/7/square_brackets_for.rb
+- lib/zucker/7/kernel.rb
+- lib/zucker/7/engine.rb
+- lib/zucker/7/os.rb
+- lib/zucker/7/object.rb
+- lib/zucker/7/cc.rb
+- lib/zucker/7/debug.rb
+- lib/zucker/7/env.rb
+- lib/zucker/7/version.rb
+- lib/zucker/7/union.rb
 - lib/zucker/shortcuts.rb
 - lib/zucker/square_brackets_for.rb
 - lib/zucker/kernel.rb