zucker 0.9

data/lib/zucker/1/specification/mm_spec.rb

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

data/lib/zucker/1/specification/regexp2proc_spec.rb

@@ -0,0 +1,9 @@
+require 'regexp2proc'
+
+describe 'Regexp#to_proc' do
+  it 'should match the regex' do
+    %w|just another string array|.map(     &/[jy]/).should == ["j", nil, nil, "y"]
+    %w|just another string array|.select(  &/[jy]/).should == ["just", "array"]
+  end
+end
+

data/lib/zucker/1/specification/sandbox_spec.rb

@@ -0,0 +1,7 @@
+require 'sandbox'
+
+describe 'sandbox' do
+  it 'should throw a SecurityError if bad commands are issued'
+  it 'should run the lambda passed as first parameter for errors, if it is given'
+end
+

data/lib/zucker/1/specification/square_brackets_for_spec.rb

@@ -0,0 +1,59 @@
+require 'square_brackets_for'
+
+describe 'square_brackets_for' do
+
+  before do
+    class Klass
+      def initialize
+        @var = {
+          :a_key => 1,
+          :another_one => 2,
+        }
+      end
+
+      @eigenvar = {
+        :a_key => 99
+      }
+    end
+  end
+
+  it 'should define a [] getter (not a setter) for an instance var, if the second parameter is false' do
+
+    class Klass
+      square_brackets_for :var, nil
+    end
+
+    a = Klass.new
+    a[:a_key].should == 1
+
+    proc do
+      a[:this_is] = 'not possible'
+    end.should raise_exception NoMethodError
+  end
+
+  it 'should define [] and []= for accessing an instance variable' do
+
+    class Klass
+      square_brackets_for :var
+    end
+
+    a = Klass.new
+    a[:a_key].should == 1
+
+    a[:this_is] = 'useful'
+    a[:this_is].should == 'useful'
+  end
+
+  it 'should also work for class-instance variables' do
+
+    class Klass
+      class << Klass
+        square_brackets_for :eigenvar
+      end
+    end
+
+    Klass[:a_key].should == 99
+  end
+
+end
+

data/lib/zucker/1/specification/string_spec.rb

@@ -0,0 +1,29 @@
+require 'string'
+
+describe 'String#^' do
+  it 'should give C-like substring access to strings' do
+    string = 'Theoretische Informatik ist voll geil!'
+
+    (string|0).should  == 'Theoretische Informatik ist voll geil!'
+    (string|1).should  == 'heoretische Informatik ist voll geil!'
+    (string|13).should == 'Informatik ist voll geil!'
+    (string|-1).should == 'Theoretische Informatik ist voll geil'
+    (string|38).should == ''
+    (string|99).should == nil
+  end
+end
+
+describe 'String#lchomp' do
+  it 'should chomp on the left side' do
+    string = 'Theoretische Informatik ist voll geil!'
+    string.lchomp('T').should  == 'heoretische Informatik ist voll geil!'
+  end
+end
+
+describe 'String#ords' do
+  it 'should unpack characters' do
+    string = 'Theoretische Informatik ist voll geil!'
+    string.ords.should  == [84, 104, 101, 111, 114, 101, 116, 105, 115, 99, 104, 101, 32, 73, 110, 102, 111, 114, 109, 97, 116, 105, 107, 32, 105, 115, 116, 32, 118, 111, 108, 108, 32, 103, 101, 105, 108, 33]
+  end
+end
+

data/lib/zucker/1/specification/unary_spec.rb

@@ -0,0 +1,26 @@
+require 'unary'
+
+describe Symbol, '#+@' do
+  it 'should convert to_s' do
+    +(:matz) == 'matz' # () 1.8 bug
+  end
+end
+
+describe Symbol, '#-@' do
+  it 'should do nothing' do
+    -:matz == :matz
+  end
+end
+
+describe String, '#+@' do
+  it 'should do nothing' do
+    +'matz' == 'matz'
+  end
+end
+
+describe String, '#-@' do
+  it 'should convert to_sym' do
+    -'matz' == :matz
+  end
+end
+

data/lib/zucker/1/specification/union_spec.rb

@@ -0,0 +1,13 @@
+require 'union'
+
+describe 'Regexp#|' do
+  it 'should create an Regexp.union of both operands' do
+    (/hallo/ | /\d+/ | /./).should ==
+      Regexp.union( Regexp.union(/hallo/, /\d+/), /./ )
+  end
+end
+
+describe 'String#|' do
+  it_should_behave_like 'Regexp#|'
+end
+

data/lib/zucker/1/square_brackets_for.rb

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

@@ -0,0 +1,25 @@
+class String
+  def ^(pos)
+    pos = pos.to_i
+    if pos >= 0
+      self[pos..-1]
+    else
+      self[0...pos]
+    end
+  end
+
+  def lchomp(arg=$/)
+    self.reverse.chomp(arg).reverse
+  end
+
+  def lchomp!(arg=$/)
+    self.reverse.chomp!(arg).reverse
+  end
+
+  def ords
+    self.unpack 'C*'
+  end
+end
+
+# J-_-L
+

data/lib/zucker/1/unary.rb

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

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

@@ -0,0 +1,2 @@
+require 'zucker/1/all'
+

data/lib/zucker/debug.rb

@@ -0,0 +1,2 @@
+require 'zucker/1/debug'
+

data/lib/zucker/default.rb

@@ -0,0 +1,2 @@
+require 'zucker/1/default'
+

data/lib/zucker/edge/ideas/args.rb

@@ -0,0 +1,22 @@
+def arguments
+  mbinding = @@last_bindings[2]
+  margs = mbinding.eval "local_variables"
+  ret = {}
+
+  margs.each{ |arg|
+    ret[arg.to_sym] = mbinding.eval(arg)
+  }
+  ret
+end
+alias args arguments
+
+#### EVIL ####
+# set up binding tracer
+@@last_bindings ||= []
+set_trace_func lambda { |event, _, _, _, bind, _|
+  if event[/call/]
+    @@last_bindings.unshift bind
+    @@last_bindings.pop if @@last_bindings.size > 5
+  end
+}
+

data/lib/zucker/edge/ideas/args.yaml

@@ -0,0 +1,19 @@
+args:
+  summary: hallo
+  why: |
+   Often you just need to
+   for example, do you know this one:
+   ⇧def initialize(variable1, variable2)
+     @variable1, @variable2 = variable1, variable2
+   end⇧
+  methods:
+    arguments, args: "def a_method(a=1, b=2)\n  arguments # => {a=>1, b=>2}\nend"
+  info:
+  - Not in default, because it uses ⇧Kernel#set_trace_var⇧ (which would)...
+  package: debug
+  versions:
+  - 1.9
+  - 1.8
+  authors:
+  - Jan Lelis
+

data/lib/zucker/edge/ideas/args_spec.rb

@@ -0,0 +1,19 @@
+require 'args'
+
+describe 'arguments' do
+  it 'should create a hash containing all arguments with its names' do
+
+    def ma(hallo = 5, baum = 7)
+      hallo = 9
+      arguments
+    end
+
+    def mb
+      arguments
+    end
+
+    ma(3).should == {:hallo => 3, :baum => 7}
+    mb.should    == {}
+  end
+end
+

data/lib/zucker/edge/ideas/clone_deep.rb

@@ -0,0 +1,21 @@
+class Object
+  def clone_deep
+    case self.class
+    when Array
+      self.map &:clone_deep
+    else
+      self.clone
+    end
+  end
+  alias :dclone :clone_deep
+
+  def dup_deep
+    if self.is_a? Array
+      self.map &:dup_deep
+    else
+      self.dup
+    end
+  end
+  alias :ddup :dup_deep
+end
+

data/lib/zucker/edge/ideas/clone_deep_spec.rb

@@ -0,0 +1,12 @@
+require 'clone_deep'
+
+describe 'Array#clone_deep' do
+  it 'create a deep copy' do
+    a = [1,2,3,4,["Hallo",["Welt"],[]]]
+    b = a.clone_deep
+    b.should == a
+    b[5][3,1] = ''
+    b.should != a
+  end
+end
+

data/lib/zucker/edge/ideas/dclone.yaml

@@ -0,0 +1,12 @@
+dclone:
+  summary: Adds deep ⇧clon⇧/⇧dup⇧ methods
+  why: Sometimes you need real copies
+  methods:
+    Object#dclone: 123
+  package: default
+  versions:
+  - 1.9
+  - 1.8
+  authors:
+  - Jan Lelis
+

data/lib/zucker/edge/ideas/hash.rb

@@ -0,0 +1,18 @@
+
+# File lib/core/facets/hash/op_and.rb, line 19
+#  def &(other)
+#    Hash[ *select{ |k,v|
+#      other[k] == v
+#    }.flatten ]
+#  end
+
+#  def ^(other)
+#    Hash[ *reject{ |k,v|
+#      other[k] == v
+#    }.flatten ]
+#  end
+
+#  def -(other)
+#
+#  end
+

data/lib/zucker/edge/ideas/require_directory.rb

@@ -0,0 +1,6 @@
+def require_directory(path)
+  Dir[File.join path, '*.rb'].each{ |filename|
+    require filename
+  }
+end
+

metadata

@@ -0,0 +1,153 @@
+--- !ruby/object:Gem::Specification 
+name: zucker
+version: !ruby/object:Gem::Version 
+  hash: 25
+  prerelease: false
+  segments: 
+  - 0
+  - 9
+  version: "0.9"
+platform: ruby
+authors: 
+- Jan Lelis
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-08-05 00:00:00 +02:00
+default_executable: 
+dependencies: []
+
+description: 
+email: mail@janlelis.de
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- MIT-LICENSE
+- Rakefile
+- README
+- lib/zucker/default.rb
+- lib/zucker/all.rb
+- lib/zucker/1/default.rb
+- lib/zucker/1/all.rb
+- lib/zucker/1/string.rb
+- lib/zucker/1/sandbox.rb
+- lib/zucker/1/regexp2proc.rb
+- lib/zucker/1/ivars.rb
+- lib/zucker/1/class2proc.rb
+- lib/zucker/1/enumerable.rb
+- lib/zucker/1/documentation/meta.yaml
+- lib/zucker/1/documentation/zucker_doc.html
+- lib/zucker/1/documentation/zucker_doc.rb
+- lib/zucker/1/unary.rb
+- lib/zucker/1/hash.rb
+- lib/zucker/1/hash2proc.rb
+- lib/zucker/1/blank.rb
+- lib/zucker/1/array2proc.rb
+- lib/zucker/1/specification/hash2proc_spec.rb
+- lib/zucker/1/specification/iterate_spec.rb
+- lib/zucker/1/specification/D_spec.rb
+- lib/zucker/1/specification/kernel_spec.rb
+- lib/zucker/1/specification/union_spec.rb
+- lib/zucker/1/specification/string_spec.rb
+- lib/zucker/1/specification/class2proc_spec.rb
+- lib/zucker/1/specification/unary_spec.rb
+- lib/zucker/1/specification/egonil_spec.rb
+- lib/zucker/1/specification/ivars_spec.rb
+- lib/zucker/1/specification/sandbox_spec.rb
+- lib/zucker/1/specification/hash_spec.rb
+- lib/zucker/1/specification/array2proc_spec.rb
+- lib/zucker/1/specification/binding_spec.rb
+- lib/zucker/1/specification/mcopy_spec.rb
+- lib/zucker/1/specification/aliases_spec.rb
+- lib/zucker/1/specification/square_brackets_for_spec.rb
+- lib/zucker/1/specification/enumerable_spec.rb
+- lib/zucker/1/specification/blank_spec.rb
+- lib/zucker/1/specification/mm_spec.rb
+- lib/zucker/1/specification/array_spec.rb
+- lib/zucker/1/specification/regexp2proc_spec.rb
+- lib/zucker/1/array.rb
+- lib/zucker/1/binding.rb
+- lib/zucker/1/mm.rb
+- lib/zucker/1/aliases.rb
+- lib/zucker/1/iterate.rb
+- lib/zucker/1/egonil.rb
+- lib/zucker/1/mcopy.rb
+- lib/zucker/1/descriptions/class2proc.yaml
+- lib/zucker/1/descriptions/iterate.yaml
+- lib/zucker/1/descriptions/unary.yaml
+- lib/zucker/1/descriptions/ivars.yaml
+- lib/zucker/1/descriptions/D.yaml
+- lib/zucker/1/descriptions/array.yaml
+- lib/zucker/1/descriptions/array2proc.yaml
+- lib/zucker/1/descriptions/square_brackets_for.yaml
+- lib/zucker/1/descriptions/mm.yaml
+- lib/zucker/1/descriptions/regexp2proc.yaml
+- lib/zucker/1/descriptions/mcopy.yaml
+- lib/zucker/1/descriptions/hash2proc.yaml
+- lib/zucker/1/descriptions/enumerable.yaml
+- lib/zucker/1/descriptions/union.yaml
+- lib/zucker/1/descriptions/kernel.yaml
+- lib/zucker/1/descriptions/hash.yaml
+- lib/zucker/1/descriptions/aliases.yaml
+- lib/zucker/1/descriptions/sandbox.yaml
+- lib/zucker/1/descriptions/blank.yaml
+- lib/zucker/1/descriptions/string.yaml
+- lib/zucker/1/descriptions/binding.yaml
+- lib/zucker/1/descriptions/egonil.yaml
+- lib/zucker/1/D.rb
+- lib/zucker/1/square_brackets_for.rb
+- lib/zucker/1/kernel.rb
+- lib/zucker/1/debug.rb
+- lib/zucker/1/union.rb
+- lib/zucker/edge/ideas/dclone.yaml
+- lib/zucker/edge/ideas/hash.rb
+- lib/zucker/edge/ideas/require_directory.rb
+- lib/zucker/edge/ideas/clone_deep_spec.rb
+- lib/zucker/edge/ideas/args.yaml
+- lib/zucker/edge/ideas/clone_deep.rb
+- lib/zucker/edge/ideas/args.rb
+- lib/zucker/edge/ideas/args_spec.rb
+- lib/zucker/debug.rb
+- lib/zucker.rb
+has_rdoc: true
+homepage: http://rubyzucker.info
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- .
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: Add more sugar to Ruby
+test_files: []
+