zucker 13.1 → 100.0.0

data/lib/zucker/to_proc.rb

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

data/lib/zucker/unary.rb

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

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

@@ -1,13 +0,0 @@
-require 'zucker/aliases'
-
-describe '(aliases)' do
-  it 'should create these aliases' do
-    # see aliases.rb for aliase list
-  end
-
-  it 'should define these constants' do
-    Infinity.finite?.should == false
-    NaN.nan?.should         == true
-  end
-end
-

data/spec/array_spec.rb

@@ -1,16 +0,0 @@
-require 'zucker/array'
-
-describe 'Array#^' do
-  it 'should do an exclusive or' do
-    a = [1,2,3,4]
-    b = [3,4,5,6]
-    (a^b).should == [1,2,5,6]
-  end
-end
-
-describe 'Array#chrs' do
-  it 'should convert the array to a string, using each element as ord value for the char' do
-    [72, 97, 108, 108, 111].chrs.should == 'Hallo'
-  end
-end
-

data/spec/array_to_proc_spec.rb

@@ -1,12 +0,0 @@
-require 'zucker/array_to_proc'
-
-describe 'Array#to_proc' do
-  it 'should call the method of the first symbol, using the remaining elements as paramaters' do
-    [1,2,3,4].map( &[:to_s, 2] ).should == ["1", "10", "11", "100"]
-  end
-
-  it "should convert each element to a proc and chain it, if the first parameter is an array" do
-    [1,2,3,4].map( &[[:*,2],[:+,4]] ).should == [1,2,3,4].map{|i| i*2 + 4 }
-  end
-end
-

data/spec/binding_spec.rb

@@ -1,6 +0,0 @@
-require 'zucker/binding'
-
-describe 'Binding#variables' do
-  it 'should output information about the current environment' do; end
-end
-

data/spec/case_spec.rb

@@ -1,15 +0,0 @@
-if defined? BasicObject # 1.9 only
-  require 'zucker/case'
-
-  describe 'String#to_camel' do
-    it 'should turn a snake_cased string to CamelCase' do
-      'was_snake_case'.to_camel.should == 'WasSnakeCase'
-    end
-  end
-
-  describe 'String#to_snake' do
-    it 'should turn a CamelCased string to snake_case' do
-      'WasCamelCase'.to_snake.should == 'was_camel_case'
-    end
-  end
-end

data/spec/cc_spec.rb

@@ -1,6 +0,0 @@
-require 'zucker/cc'
-
-describe 'c' do
-  it 'should output the method callstack' do; end
-end
-

data/spec/class_to_proc_spec.rb

@@ -1,9 +0,0 @@
-require 'zucker/class_to_proc'
-require 'set'
-
-describe 'Class#to_proc' do
-  it 'should create new instances of the class' do
-    [ [1,2],[3,5,6,7,3] ].map(&Set).should == [ Set[1,2], Set[5,6,7,3] ]
-  end
-end
-

data/spec/dd_spec.rb

@@ -1,37 +0,0 @@
-require 'zucker/dd'
-
-describe 'Object#d' do
-
-  let :a do
-    [ 1, "1", 2..5, [], {:hallo => :du}, nil, true ]
-  end
-
-  it "should not change the object's value" do
-    capture_stdout do
-      a.each{ |e|
-        (e.d).should == e
-      }
-
-      a.each{ |e|
-        (e.d{|value| "This is a: #{value}"}).should == e
-      }
-    end
-  end
-
-  it "should puts .inspect if no block is given (and not change the object's value)" do
-    capture_stdout do
-      a[0].d
-      a[1].d
-      a[6].d
-    end.should == %{1\n"1"\ntrue\n}
-  end
-
-  it "should puts the block if it is given (and not change the object's value)" do
-    capture_stdout do
-      a[0].d{|value| "This is a: #{value}"}
-      a[1].d{|value| "This is a: #{value}"}
-      a[6].d{|value| "This is a: #{value}"}
-    end.should == %{This is a: 1\nThis is a: 1\nThis is a: true\n}
-  end
-end
-

data/spec/engine_spec.rb

@@ -1,11 +0,0 @@
-require 'zucker/engine'
-
-describe 'RubyEngine' do
-  it 'should display the current ruby interpreter (to_s)' do
-    RubyEngine
-  end
-
-  it 'should create many method aliases for asking for a specific interpreter' do
-    # please see the source or description file
-  end
-end

data/spec/enumerable_spec.rb

@@ -1,8 +0,0 @@
-require 'zucker/enumerable'
-
-describe 'Enumerable#mash' do
-  it 'should "map" a hash' do
-    [1,2,3].mash{|e| [e, e.to_s] }.should == {1=>'1',2=>'2',3=>'3',}
-  end
-end
-

data/spec/file_spec.rb

@@ -1,46 +0,0 @@
-require 'zucker/file'
-require 'fileutils'
-
-describe 'File.gsub' do
-  let :random_filename do
-    'test_' + (0..20).map{|e| [*'a'..'z'].send RUBY_VERSION > '1.9' ? :sample : :choice }*''
-  end
-
-  it 'should read filename in arg1, substitute every key in the arg2 with its value and save the file' do
-    File.open(random_filename,'w'){ |file|
-      file.print 'should read filename in arg1, substitute every key in the arg2 with its value and save the file'
-    }
-    File.gsub random_filename,
-      /read/ => 'write',
-      /\d+/  => proc{|m| (m.to_i+1).to_s }
-
-    File.read(random_filename).should ==
-      'should write filename in arg2, substitute every key in the arg3 with its value and save the file' 
-
-    FileUtils.rm random_filename
-  end
-end
-
-describe 'File.delete!' do
-  let :random_filename do
-    'test_' + (0..20).map{|e| [*'a'..'z'].send RUBY_VERSION > '1.9' ? :sample : :choice }*''
-  end
-
-  it 'should delete the filename given as argument if it exists + return non-nil' do
-    FileUtils.touch random_filename
-    res = false
-    proc do
-      res = File.delete! random_filename
-    end.should_not raise_exception
-    res.should be_true
-  end
-
-  it 'should do nothing if the filename given as argument does not exist + return nil' do
-    res = false
-    proc do
-      res = File.delete! random_filename
-    end.should_not raise_exception
-    res.should be_false
-  end
-end
-

data/spec/hash_spec.rb

@@ -1,25 +0,0 @@
-require 'zucker/hash'
-
-describe 'Hash.zip' do
-  it 'should zip together both given enumerables and take them as key=>values for a new hash' do
-    Hash.zip( [1,2,3], [4,5,6] ).should == { 1=>4, 2=>5, 3=>6 }
-  end
-end
-
-describe 'Hash#<<' do
-  it 'should append new elements to the hash' do
-    a =  { 1=>4, 2=>5, 3=>6 }
-    a << { 4=>7 }
-    a << [5, 8]
-    a.should == { 1=>4, 2=>5, 3=>6, 4=>7, 5=>8 }
-  end
-end
-
-describe 'Hash#&' do
-  it 'should select a sub hash containt only equal key-value pairs' do
-    a =  { 1=>4, 2=>5, 3=>6 }
-    b=   { 1=>4, 2=>7 }
-    (a & b).should == { 1=>4 }
-  end
-end
-

data/spec/hash_to_proc_spec.rb

@@ -1,12 +0,0 @@
-require 'zucker/hash_to_proc'
-
-describe 'Hash#to_proc' do
-  it 'should run the proc given in the value for a key in the hash' do
-    [1,2,3,4].map(&{
-      4 => :to_s,
-      # 3 => [:to_s, 2]  # "11" =>  if array2proc is used
-      2 => lambda {|e| e + 1000}
-    }).should == [1, 1002, 3, "4"]
-  end
-end
-

data/spec/info_spec.rb

@@ -1,8 +0,0 @@
-require 'zucker/info'
-
-describe 'Info' do
-  it 'should define accessors for global variables, constants and some special methods/keywords' do
-    # see sourcefile for the list
-  end
-end
-

data/spec/ivars_spec.rb

@@ -1,20 +0,0 @@
-require 'zucker/ivars'
-
-describe 'instance_variables_from' do
-  it 'should tansform the given parameter to instance variables' do
-    def a_method(a = 1, b = 2)
-      instance_variables_from binding # assigns @a and @b
-
-      params = {:c => 3, :d => 4}
-      ivars params # # assigns @c and @d
-    end
-
-    a_method
-    @a.should == 1
-    @b.should == 2
-    @c.should == 3
-    @d.should == 4
-
-  end
-end
-

data/spec/kernel_spec.rb

@@ -1,42 +0,0 @@
-require 'zucker/kernel'
-
-describe 'activate_warnings!' do
-  it 'should set $VERBOSE to true' do
-    activate_warnings!
-    $VERBOSE.should == true
-  end
-end
-
-describe 'deactivate_warnings!' do
-  it 'should set $VERBOSE to false' do
-    deactivate_warnings!
-    $VERBOSE.should == false
-  end
-end
-
-describe 'library?' do
-  it 'should return false if the file is invoked directly' do
-    library?.should == ( __FILE__ != $PROGRAM_NAME )
-  end
-end
-
-describe 'executed_directly?' do
-  it 'should return true if the file is invoked directly' do
-    executed_directly?.should == ( __FILE__ == $PROGRAM_NAME )
-  end
-end
-
-describe 'irb?' do
-  it 'should return true if called in IRB or RIPL' do; end
-end
-
-describe 'ignore_sigint!' do
-  it 'should catch ctrl+c signals' do; end
-end
-
-describe 'ignore_sigquit!' do
-  it 'should catch ctrl+\ signals' do; end
-end
-
-
-# J-_-L

data/spec/mm_spec.rb

@@ -1,6 +0,0 @@
-require 'zucker/mm'
-
-describe 'Object#mm' do
-  it 'should display an ordered method list' do; end
-end
-

data/spec/not_spec.rb

@@ -1,10 +0,0 @@
-if defined? BasicObject # 1.9 only
-  require 'zucker/not'
-
-  describe 'Object#not' do
-    it "should return an object on which all methods are redirected to it's receiver object, but return an inverted boolean" do
-      [1,2,3].not.empty?.should == true
-      nil.not.nil?.should == false
-    end
-  end
-end

data/spec/oo_spec.rb

@@ -1,6 +0,0 @@
-require 'zucker/oo'
-
-describe 'o' do
-  it 'should output the current line, file, method and label (if given)' do; end
-end
-

data/spec/os_spec.rb

@@ -1,37 +0,0 @@
-require 'zucker/os'
-
-describe 'OS' do
-  it 'should display the used operation system (to_s)' do; end
-end
-
-describe 'linux?' do
-  it 'should return true if OS is a linux' do; end
-end
-
-describe 'mac?' do
-  it 'should return true if OS is a mac or darwin' do; end
-end
-
-describe 'bsd?' do
-  it 'should return true if OS is a bsd' do; end
-end
-
-describe 'windows?' do
-  it 'should return true if OS is a windows' do; end
-end
-
-describe 'solaris?' do
-  it 'should return true if OS is a solaris or sunos' do; end
-end
-
-describe 'posix?' do
-  it 'should return true if OS is posix compatible' do; end
-end
-
-describe 'OS.is?' do
-  it "should test if RbConfig::CONFIG['host_os'] matches the regex (boolean value)" do
-    OS.is?(/linux/).should ==
-    !!( RbConfig::CONFIG['host_os'] =~ /linux/ )
-  end
-end
-

data/spec/qq_spec.rb

@@ -1,19 +0,0 @@
-require 'zucker/qq'
-
-describe 'q' do
-
-  it 'should output the same as p for a single arg' do
-    capture_stdout{p /some object/}.should ==
-    capture_stdout{q /some object/}
-  end
-
-  it "should output the same as p but for multiple args one one line, values separated by two spaces" do
-    capture_stdout do
-      q 1, "1", 2..5, [], {:hallo => :du}, nil, true
-    end.chop.should ==
-    capture_stdout do
-      p 1, "1", 2..5, [], {:hallo => :du}, nil, true
-    end.chop.gsub( "\n", '  ' )
-  end
-end
-