zucker 13.1 → 100.0.0

data/lib/zucker/aliases.rb

@@ -1,52 +0,0 @@
-require 'zucker'
-module Zucker Aliases = true end
-
-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/array.rb

@@ -1,15 +0,0 @@
-require 'zucker'
-module Zucker Array = true end
-
-class Array
-  def ^(other)
-    (self - other) + (other - self)
-  end
-
-  def chrs
-    self.pack 'C*'
-  end
-end
-
-# J-_-L
-

data/lib/zucker/array_to_proc.rb

@@ -1,19 +0,0 @@
-require 'zucker'
-module Zucker ArrayToProc = true end
-
-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/binding.rb

@@ -1,35 +0,0 @@
-require 'zucker'
-module Zucker Binding = true end
-
-unless defined?(RUBY_ENGINE) && RUBY_ENGINE == 'rbx'
-  class Binding
-    def variables
-      put_vars = lambda { |array|
-        if array.empty?
-          ' - none'
-        else
-          array.map{|e|
-            val = (self.eval "#{e}").inspect
-            " - #{e}: #{ val }"
-          }.join "\n"
-        end
-      }
-
-      puts "#{self.to_s}
-local variables
-#{ put_vars[ self.eval 'local_variables' ] }
-(instance variables)
-#{ put_vars[ self.eval 'instance_variables' ] }
-self
- - #{self.eval 'self'}
-block_given?
- - #{self.eval 'block_given?'}"
-
-    end
-
-    alias vars variables
-  end
-end
-
-# J-_-L
-

data/lib/zucker/case.rb

@@ -1,14 +0,0 @@
-require 'zucker'
-module Zucker Case = true end
-
-class String
-  def to_snake
-    gsub(/(?<!^)[A-Z]/) do "_#$&" end.downcase
-  end
-  
-  def to_camel
-    gsub(/(?:^|_)([a-z])/) do $1.upcase end
-  end
-end
-
-# J-_-L

data/lib/zucker/cc.rb

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

data/lib/zucker/class_to_proc.rb

@@ -1,13 +0,0 @@
-require 'zucker'
-module Zucker ClassToProc = true end
-
-class Class
-  def to_proc
-    Proc.new do |*args|
-      self.new(*args)
-    end
-  end
-end
-
-# J-_-L
-

data/lib/zucker/control.rb

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

data/lib/zucker/dd.rb

@@ -1,24 +0,0 @@
-require 'zucker'
-module Zucker Dd = true end
-
-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/debug.rb

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

data/lib/zucker/default.rb

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

data/lib/zucker/engine.rb

@@ -1,70 +0,0 @@
-require 'zucker'
-module Zucker Engine = true end
-
-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
-    alias inspect to_s
-
-    # 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/enumerable.rb

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

data/lib/zucker/env.rb

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

data/lib/zucker/extensions.rb

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

data/lib/zucker/file.rb

@@ -1,28 +0,0 @@
-require 'zucker'
-module Zucker File = true end
-
-class << File
-  def gsub(filename, regex_hash)
-    data = File.read filename
-    File.open(filename,'w'){ |file|
-      regex_hash.each{ |regex, new_string|
-        regex = regex.to_s unless regex.is_a? Regexp
-
-        if new_string.is_a? Proc
-          data.gsub! regex, &new_string
-        else
-          data.gsub! regex, new_string
-        end
-      }
-      file.print data
-    }
-  end
-
-  def delete! filename
-    return nil if !File.exist?(filename)
-    File.delete filename
-  end
-end
-
-# J-_-L
-

data/lib/zucker/hash.rb

@@ -1,28 +0,0 @@
-require 'zucker'
-module Zucker Hash = true end
-
-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/hash_to_proc.rb

@@ -1,17 +0,0 @@
-require 'zucker'
-module Zucker HashToProc = true end
-
-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/info.rb

@@ -1,193 +0,0 @@
-require 'zucker'
-require 'rbconfig'
-require 'etc'
-module Zucker Info = true end
-
-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
-