ludy 0.0.9 → 0.1.0

data/CHANGES

@@ -1,95 +1,126 @@
+= ludy changes history
 
-==============================
-ludy TODO
-  multi
-  chain travel
-  method hook
+== ludy 0.1.0, 2008.01.08
 
-==============================
-ludy 0.0.9, 2008.01.07
+* directory structure rearranged
+    now you would like to require something like:
+    require 'ludy/proc/bind'
+    require 'ludy/lazy'
+    require 'ludy/kernel/defun'
+    require 'puzzle_generator'
+    ...
+    the load path is now manipulated by ludy.rb, with require guard,
+    to make sure that all .rb is only required once. (all the same require path.)
 
-Proc#bind added, see test/tc_bind.rb
+* you can now:
+    require 'ludy/kernel' # for all kernel method
+    require 'ludy/all'    # for all ludy things
 
-==============================
-ludy 0.0.8, 2007.12.06
+* there's no require_ludy anymore.
 
-1. ludy_ext:
+* project skeleton is now built through Mr Bones 1.3.0, see NOTICE
+
+* many things are now deprecated. they are hard to implemented correctly,
+  or useless, or easy to be replaced, or for some other reasons.
+
+* ludy is now compatible with ruby 1.9. and a few ruby 1.9's features are
+  now added in ludy to help improve compatibility between ruby versions.
+
+* ludy executable is added. it simply call rake with ludy tasks, so:
+    $ ludy test # to run all tests
+    $ ludy doc  # generate rdoc
+    $ ludy      # see all ludy tasks
+
+* ludy_ext.rb is split into many other .rb
+
+* C++ ERB meta-programming is added.
+
+* multi re-implementation is done. the new one is called defun.
+  it supports overloading(ad-hoc polymorphism), multi-method,
+  pattern matching, and perhaps others?
+
+* rdoc support is added.
+
+* http://ludy.rubyforge.org would now insist on the latest rdoc.
+
+* Array#reverse_map, Array#body, Array#rotate, Array#combos, etc. is added.
+
+== ludy 0.0.9, 2008.01.07
+
+* Proc#bind added, see test/tc_bind.rb
+
+== ludy 0.0.8, 2007.12.06
+
+* ludy_ext:
   added:
-    1. Array#untranspose!
-    2. Array#unzip!
+    * Array#untranspose!
+    * Array#unzip!
 
   changed:
-    1. Kernel#curry support Symbol
+    * Kernel#curry support Symbol
 
-2. puzzle_generator added...
+* puzzle_generator added...
 
-==============================
-ludy 0.0.7, 2007.10.08
+== ludy 0.0.7, 2007.10.08
 
-1. ludy_ext:
+* ludy_ext:
   added:
-    1. Array#untranspose
-    2. Array#unzip
-    3. Array#combine!
-    4. Object#m
-    5. Kernel#id
+    * Array#untranspose
+    * Array#unzip
+    * Array#combine!
+    * Object#m
+    * Kernel#id
 
-==============================
-ludy 0.0.6, 2007.09.15
+== ludy 0.0.6, 2007.09.15
 
-1. ludy_ext:
+* ludy_ext:
   added:
-    1. Array#combine
+    * Array#combine
 
   moved:
-    1. move Symbol#to_proc to Symbol#to_msg,
+    * move Symbol#to_proc to Symbol#to_msg,
        and take back the original Symbol#to_proc implementation.
 
-2. change the way we require
+* change the way we require
 
-==============================
-ludy 0.0.5, 2007.09.15
+== ludy 0.0.5, 2007.09.15
 
-i forgot what i'd done... (days ago)
-but sure there's Symbol#to_proc and Symbol#to_msg,
-also, please read unit test.
+ i forgot what i'd done... (days ago)
+ but sure there's Symbol#to_proc and Symbol#to_msg,
+ also, please read unit test.
 
-==============================
-ludy 0.0.4, 2007.08.12
+== ludy 0.0.4, 2007.08.12
 
-1. ludy_ext:
+* ludy_ext:
   renamed:
-    1. Proc#curry => Proc#__curry__
+    * Proc#curry => Proc#__curry__
 
   added:
-    1. Kernel#curry
+    * Kernel#curry
 
-strongly suggest that use Kernel#curry instead of Proc#__curry__,
-see unit test for usage and changes
+ strongly suggest that use Kernel#curry instead of Proc#__curry__,
+ see unit test for usage and changes
 
-==============================
-ludy 0.0.3, 2007.08.07
+== ludy 0.0.3, 2007.08.07
 
-1. ludy_ext:
+* ludy_ext:
   added:
-    1. Proc#curry
-    2. Proc#compose
-    3. Proc#chain
-    4. Symbol#to_proc
-    5. Array#foldl
-    6. Array#foldr
-    7. Array#filter
+    * Proc#curry
+    * Proc#compose
+    * Proc#chain
+    * Symbol#to_proc
+    * Array#foldl
+    * Array#foldr
+    * Array#filter
 
   removed:
-    1. Fixnum#collect # see tc_ludy_ext.rb#test_fixnum_collect for reason
+    * Fixnum#collect # see tc_ludy_ext.rb#test_fixnum_collect for reason
 
   info:
-    1. ruby2ruby has NilClass#method_missing return nil,
+    * ruby2ruby has NilClass#method_missing return nil,
        so i can't just make it return blackhole
 
-2. module Curry:
+* module Curry:
   see test/tc_curry.rb for usage
 
-see unit test for usage
-
-==============================
+ see unit test for usage

data/Manifest.txt

@@ -0,0 +1,96 @@
+CHANGES
+LICENSE
+Manifest.txt
+NOTICE
+README
+Rakefile
+TODO
+bin/ludy
+lib/ludy.rb
+lib/ludy/all.rb
+lib/ludy/array.rb
+lib/ludy/array/body.rb
+lib/ludy/array/combine.rb
+lib/ludy/array/combos.rb
+lib/ludy/array/filter.rb
+lib/ludy/array/foldl.rb
+lib/ludy/array/foldr.rb
+lib/ludy/array/reverse_map.rb
+lib/ludy/array/rotate.rb
+lib/ludy/blackhole.rb
+lib/ludy/class.rb
+lib/ludy/class/undef_all_methods.rb
+lib/ludy/deprecated/aspect.rb
+lib/ludy/deprecated/callstack.rb
+lib/ludy/deprecated/curry.rb
+lib/ludy/deprecated/rambda.rb
+lib/ludy/deprecated/this.rb
+lib/ludy/deprecated/untranspose.rb
+lib/ludy/deprecated/unzip.rb
+lib/ludy/dices.rb
+lib/ludy/kernel.rb
+lib/ludy/kernel/defun.rb
+lib/ludy/kernel/ergo.rb
+lib/ludy/kernel/id.rb
+lib/ludy/kernel/if_else.rb
+lib/ludy/kernel/m.rb
+lib/ludy/kernel/public_send.rb
+lib/ludy/kernel/singleton_method.rb
+lib/ludy/kernel/tap.rb
+lib/ludy/lazy.rb
+lib/ludy/message_dispatcher.rb
+lib/ludy/pattern_matcher.rb
+lib/ludy/proc.rb
+lib/ludy/proc/bind.rb
+lib/ludy/proc/chain.rb
+lib/ludy/proc/compose.rb
+lib/ludy/proc/curry.rb
+lib/ludy/symbol.rb
+lib/ludy/symbol/curry.rb
+lib/ludy/symbol/to_msg.rb
+lib/ludy/symbol/to_proc.rb
+lib/ludy/tasks.rb
+lib/ludy/tasks/erb_cpp.rb
+lib/ludy/tasks/erb_cpp/attr_builder.rb
+lib/ludy/tasks/erb_cpp/header_guard.rb
+lib/ludy/tasks/erb_cpp/template_forward_parameters.rb
+lib/ludy/test/helper.rb
+lib/ludy/variable.rb
+lib/ludy/y_combinator.rb
+lib/ludy/z_combinator.rb
+lib/puzzle_generator.rb
+lib/puzzle_generator/chain.rb
+lib/puzzle_generator/chained_map.rb
+lib/puzzle_generator/colored_map.rb
+lib/puzzle_generator/map.rb
+lib/puzzle_generator/misc.rb
+lib/puzzle_generator/puzzle.rb
+spec/ludy_spec.rb
+tasks/annotations.rake
+tasks/doc.rake
+tasks/gem.rake
+tasks/manifest.rake
+tasks/rubyforge.rake
+tasks/setup.rb
+tasks/spec.rake
+tasks/svn.rake
+tasks/test.rake
+test/deprecated/callstack.rb
+test/deprecated/curry.rb
+test/deprecated/rambda.rb
+test/deprecated/this.rb
+test/deprecated/ts_ludy.rb
+test/deprecated/unzip_and_untranspose.rb
+test/example_puzzle.rb
+test/test_all.rb
+test/test_array.rb
+test/test_class.rb
+test/test_defun.rb
+test/test_dices.rb
+test/test_kernel.rb
+test/test_lazy.rb
+test/test_proc.rb
+test/test_symbol.rb
+test/test_variable.rb
+test/test_y_combinator.rb
+test/test_z_combinator.rb

data/NOTICE

@@ -1,26 +1,13 @@
+= notice for other stuffs
 
-ludy project
+* this project skeleton is built through Mr Bones 1.3.0:
+    gem install bones
+    http://codeforpeople.rubyforge.org/bones/
 
-Aims to extend Ruby standard library,
-providing some useful tools that's not existed in the standard library.
+* for puzzle_generator, Ruby Facets is needed:
+    gem install facets
+    http://facets.rubyforge.org/
 
-http://ludy.rubyforge.org/
-http://rubyforge.org/projects/ludy/
-
-Programs under lib/lib/* are not licensed under Apache License 2.0,
-instead they all licensed under the license they originated.
-Some of them were modified by Lin Jen-Shin (author of ludy).
-See each file for more information.
-
-*file which is modified.
-
-== prgorams belows belong to
-    Christopher Cyll and licensed under MIT license ==
-
-http://multi.rubyforge.org/
-http://rubyforge.org/projects/multi/
-
-lib/lib/amulti.rb
-lib/lib/multi.rb
-lib/lib/smulti.rb
-==
+* defun is re-implemented gem multi:
+    gem install multi
+    http://multi.rubyforge.org/

data/README

@@ -1,17 +1,180 @@
+= ludy 0.1.0
+    by Lin Jen-Shin (a.k.a. godfat 真常)
+    strip any number: 18god29fat7029 (at] godfat32 -dooot- 20org
+    http://ludy.rubyforge.org
+    http://godfat.org
 
-always require "ludy" first when you use any tool of ludy
-(although there are tools that needn't this init)
+== DESCRIPTION:
+  
+Aims to extend Ruby standard library, providing some useful tools that's not existed in the standard library.
 
-e.g.
+== FEATURES:
 
-require 'ludy'       # when you're using ludy gem
-require path_of_ludy # when you aren't using ludy gem
+* ludy standard library extension
+* puzzle_generator
+* c++ erb meta-programming
 
-then you could require other ludy tools
+== SYNOPSIS:
 
-e.g. for use of Ludy::this
+please see unit test for all examples.
 
-require 'ludy/this'  # for a common way when you're using ludy gem
-require path_of_this # for a common way when you aren't using ludy gem
+    $ ludy test # run all ludy tests
+    $ ludy      # see all tasks related to ludy
 
-require_ludy 'this'  # tool in ludy that help ludy handle the requirement
+ please don't run any task about release... contact me first
+ if you would like to make changes into official ludy release.
+
+    require 'ludy/all'        # for all ludy things
+    require 'ludy/kernel'     # for all kernel methods
+    require 'ludy/tasks'      # for all ludy tasks
+    require 'ludy/proc/curry' # for proc's method curry
+
+ you can make any change and then $ ludy gem:install on your local machine.
+ below is some example extracted from unit test.
+
+curry:
+  require 'ludy/proc/curry'
+  assert_equal 29, :+.to_proc.curry[18][11]
+
+bind:
+  require 'ludy/proc/bind'
+  assert_equal [9,8,7], ([1,2,3].map &(lambda{|lhs, rhs| lhs-rhs}.bind 10, :_1))
+
+defun:
+  require 'ludy/kernel/defun'
+  defun :fact, 0 do |n|
+    1
+  end
+
+  defun :fact, Integer do |n|
+    n * fact(n-1)
+  end
+
+  assert_equal 3628800, fact(10)
+
+  defun :f, Integer do |n| 1; end
+  defun :f, String do |n| '2'; end
+  defun(:f, Integer, Integer) do |n,g| 3; end
+
+  assert_equal 1, f(10)
+  assert_equal '2', f('')
+  assert_equal 3, f(1,1)
+  assert_raise NoMethodError do f('1', 2); end
+
+lazy:
+  require 'ludy/lazy'
+  Y = lambda{|f|
+    lambda{|x| lazy{f[x[x]]} }[lambda{|x| lazy{f[x[x]]} }]
+  }
+
+y_combinator:
+  require 'ludy/y_combinator'
+  fact = Y[lambda{|this|
+    lambda{|n| n==1 ? 1 : n*this[n-1]}
+  }]
+  assert_equal(3628800, fact[10])
+
+
+ludy tasks:
+
+
+header_guard:
+  require 'ludy/tasks/erb_cpp/header_guard'
+  PROJ = 'header_sample' # remember to set project name
+
+  # in utils/SimpleTest.hpp.erb
+  <%= header_guard %>
+
+  # run preprocessing task
+  $ rake erb:preprocessing
+
+  # produce:
+  #ifndef _HEADER_SAMPLE_UTILS_SIMPLETEST_
+  #define _HEADER_SAMPLE_UTILS_SIMPLETEST_
+
+attr_builder:
+  require 'ludy/tasks/erb_cpp' # it would require all erb_cpp tasks.
+
+  # in MapSetting.hpp.erb
+  class MapSetting{
+  <%= accessor :int, :frequency %>
+  <%= accessor :double, :speed, :damage_factor %>
+  <%= reader :int, :width, :height, :size %>
+  };
+
+  # run preprocessing task
+  $ rake erb:preprocessing
+
+  # produce:
+  class MapSetting{
+  public:
+      int frequency() const{ return frequency_; }
+  public:
+      MapSetting& frequency(int const& new_frequency){ frequency_ = new_frequency; return *this; }
+  private:
+      int frequency_;
+
+  public:
+      double speed() const{ return speed_; }
+      double damage_factor() const{ return damage_factor_; }
+  public:
+      MapSetting& speed(double const& new_speed){ speed_ = new_speed; return *this; }
+      MapSetting& damage_factor(double const& new_damage_factor){ damage_factor_ = new_damage_factor; return *this; }
+  private:
+      double speed_, damage_factor_;
+
+  public:
+      int width() const{ return width_; }
+      int height() const{ return height_; }
+      int size() const{ return size_; }
+  private:
+      int width_, height_, size_;
+  };
+
+template_forward_parameters:
+  require 'ludy/tasks/erb_cpp/template_forward_parameters'
+
+  # in test.hpp.erb
+  <% for_template_parameters_within(1..5, []){ |args_list| %>
+      template <%= template_parameters args_list %>
+      static element_type create(<%= forward_parameters args_list %>){
+          return element_type(SPool::Instance().construct(<%= arguments args_list %>), Deleter());
+      }
+  <% } %>
+
+  # run preprocessing task
+  $ rake erb:preprocessing
+
+  # one of the produce: (can't list all...)
+  template <class T0, class T1, class T2, class T3>
+  static element_type create(T0 const& a, T1 const& b, T2 & c, T3 const& d){
+      return element_type(SPool::Instance().construct(a, b, c, d), Deleter());
+  }
+
+== REQUIREMENTS:
+
+* ruby 1.8/1.9 (1.9 is prefered...)
+* rake
+* gem facets if you are using puzzle_generator
+
+== INSTALL:
+
+* sudo gem install ludy
+
+== LICENSE:
+
+Apache License 2.0
+
+Copyright (c) 2008, Lin Jen-Shin (a.k.a. godfat 真常)
+
+Licensed under the Apache License, Version 2.0 (the "License");
+you may not use this file except in compliance with the License.
+You may obtain a copy of the License at
+
+   http://www.apache.org/licenses/LICENSE-2.0
+
+Unless required by applicable law or agreed to in writing, software
+distributed under the License is distributed on an "AS IS" BASIS,
+WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+See the License for the specific language governing permissions and
+limitations under the License.

data/Rakefile

@@ -0,0 +1,33 @@
+# Look in the tasks/setup.rb file for the various options that can be
+# configured in this Rakefile. The .rake files in the tasks directory
+# are where the options are used.
+
+load 'tasks/setup.rb'
+
+ensure_in_path 'lib'
+require 'ludy'
+
+task :default do
+  sh 'rake --tasks'
+end
+
+PROJ.name = 'ludy'
+PROJ.summary = 'Aims to extend Ruby standard library, providing some useful tools that\'s not existed in the standard library.'
+PROJ.authors = 'Lin Jen-Shin (a.k.a. godfat 真常)'
+PROJ.email = 'strip any number: 18god29fat7029 (at] godfat32 -dooot- 20org'
+PROJ.url = 'http://ludy.rubyforge.org/'
+PROJ.description = paragraphs_of('README', 1).join("\n\n")
+PROJ.changes = paragraphs_of('CHANGES', 0..1).join("\n\n")
+PROJ.rubyforge_name = 'ludy'
+
+PROJ.version = '0.1.0'
+PROJ.exclude << '.DS_Store' << '^tmp'
+PROJ.dependencies << 'rake'
+
+PROJ.rdoc_main = 'README'
+PROJ.rdoc_exclude << 'deprecated' << 'Manifest' << 'Rakefile' << 'tmp$' << '^tmp'
+PROJ.rdoc_include << '\w+'
+
+PROJ.spec_opts << '--color'
+
+# EOF

data/TODO

@@ -0,0 +1,5 @@
+= ludy todo list
+
+* chain travel
+* method hook
+* more rdoc

data/bin/ludy

@@ -0,0 +1,11 @@
+#!/usr/bin/env ruby
+
+require File.expand_path(
+    File.join(File.dirname(__FILE__), '..', 'lib', 'ludy'))
+
+# Put your code here
+
+Dir.chdir Ludy.path
+puts `rake #{ARGV.join(' ')}`
+
+# EOF

data/lib/ludy/all.rb

@@ -0,0 +1,3 @@
+
+require 'ludy'
+Ludy.require_all_in '.'

data/lib/ludy/array/body.rb

@@ -0,0 +1,9 @@
+
+class Array
+  # strip the last element
+  #   [1,2,3].body
+  #   => [1,2]
+  def body
+    self[0..-2]
+  end
+end

data/lib/ludy/array/combine.rb

@@ -0,0 +1,16 @@
+
+require 'ludy/symbol/to_proc'
+
+class Array
+  #   [1,2,3].combine [2,4,6]
+  #   => [3,6,9]
+  #
+  #   [1,2].combine [1,2], [1,2]
+  #   => [3,6]
+  #
+  #   ['a','b'].combine ['b','a']
+  #   => ['ab','ba']
+  def combine *target; zip(*target).map{|i|i.inject(&:+)}; end
+  # in-place version of combine
+  def combine! *target; replace combine(*target); end
+end

data/lib/ludy/array/combos.rb

@@ -0,0 +1,23 @@
+
+require 'ludy/array/reverse_map'
+require 'ludy/symbol/to_proc'
+require 'ludy/array/foldr'
+
+class Array
+  # for each combos
+  #   [[0,1],[2,3]].combos
+  #   => [[0,2],[0,3],[1,2],[1,3]]
+  def combos
+    result = []
+    radixs = reverse_map(&:size)
+    inject(1){|r, i| r * i.size}.times{ |step|
+      result << foldr(lambda{ |i, r|
+                        radix = radixs[r.size]
+                        r.unshift i[step % radix]
+                        step /= radix unless radix.nil?
+                        r
+                      }, [])
+    }
+    result
+  end
+end

data/lib/ludy/array/filter.rb

@@ -0,0 +1,4 @@
+
+class Array
+  alias_method :filter, :select
+end

data/lib/ludy/array/foldl.rb

@@ -0,0 +1,5 @@
+
+class Array
+  # fold from left to right (it just like inject)
+  def foldl func, init; inject init, &func; end
+end

data/lib/ludy/array/foldr.rb

@@ -0,0 +1,8 @@
+
+class Array
+  # fold from right to left
+  def foldr func, init
+    reverse_each{ |i| init = func[i, init] }
+    init
+  end
+end

data/lib/ludy/array/reverse_map.rb

@@ -0,0 +1,7 @@
+
+class Array
+  # synonymy for reverse.map
+  def reverse_map &block
+    reverse.map(&block)
+  end
+end

data/lib/ludy/array/rotate.rb

@@ -0,0 +1,22 @@
+
+class Array
+  # rotate right with size.
+  # if the size is negative, rotate left.
+  #   [1,2,3].rotate
+  #   => [3,1,2]
+  #
+  #   [1,2,3].rotate -1
+  #   => [2,3,1]
+  #
+  #   [1,2,3].rotate 2
+  #   => [2,3,1]
+  def rotate size = 1
+    head = size > 0 ? last(size) : self[(-size)..-1]
+    tail = self - head
+    head + tail
+  end
+  # in-place version of rotate
+  def rotate!
+    replace rotate
+  end
+end

data/lib/ludy/array.rb

@@ -0,0 +1,3 @@
+
+require 'ludy'
+Ludy.require_all_in 'array'