iolite 0.0.1

data/spec/iolite_lazy_spec.rb

@@ -0,0 +1,92 @@
+load 'spec_helper.rb'
+require "iolite/lazy"
+
+
+describe "Iolite lazy" do
+	describe "Iolite::lazy" do
+		include Iolite
+		arg1 = Iolite.lazy { |*args| args[0] }
+		arg2 = Iolite.lazy { |*args| args[1] }
+
+		describe "#class" do
+			it "#class by Obejct#class" do
+				expect(lazy { |a, b| a + b }.class).to eq(Iolite::Lazy)
+			end
+		end
+
+		describe "#call" do
+			it "call" do
+				expect(lazy { |a, b| a + b }.call(1, 2)).to eq(3)
+			end
+		end
+
+		describe "#bind" do
+			it "bind argument" do
+				expect(lazy { |a, b| a + b }.bind(1, 2).call()).to eq(3)
+			end
+			it "bind placeholders" do
+				expect(lazy { |a, b| a + b }.bind(arg2, 2).call(2, 1)).to eq(3)
+			end
+			it "bind by placeholders" do
+				expect((arg1 - arg2).bind(arg2, 2).call(1, 1)).to eq(-1)
+			end
+		end
+
+		describe "#send" do
+			it "send method" do
+				expect(arg1.send(:length).call("homu")).to eq(4)
+			end
+			it "send Object method" do
+				expect(arg1.send(:class).call("homu")).to eq(String)
+			end
+		end
+
+		describe "#method_missing" do
+			it "send method" do
+				expect(arg1.length.call("homu")).to eq(4)
+			end
+			it "send Object method" do
+				expect(arg1.class).to eq(arg1.__send__(:class))
+			end
+		end
+
+		describe "#apply" do
+			it "apply lazy" do
+				expect(arg1.apply(1, 2).call(arg1 + arg2)).to eq(3)
+			end
+		end
+
+		describe "#+" do
+			it "call lazy" do
+				expect((lazy { |a, b| a + b } + 3).call(1, 2)).to eq(6)
+			end
+		end
+
+		describe "#==" do
+			it "call" do
+				expect((arg1 == 3).call(3)).to eq(true)
+			end
+		end
+
+		describe "#===" do
+			it "call" do
+				expect((arg1 === arg2).call(/^m/, "mami")).to eq(true)
+			end
+		end
+
+		describe "#to_s" do
+			it "Symbol#to_s" do
+				expect(arg1.to_s.call(:mami)).to eq("mami")
+			end
+			it "Fixnum#to_s" do
+				expect(arg1.to_s.call(42)).to eq("42")
+			end
+		end
+
+		describe "#class" do
+			it "Symbol#class" do
+				expect(arg1.class.call(:mami)).to eq(Symbol)
+			end
+		end
+	end
+end

data/spec/iolite_spec.rb

@@ -0,0 +1,212 @@
+load 'spec_helper.rb'
+
+describe Iolite do
+	it 'has a version number' do
+		expect(Iolite::VERSION).not_to be nil
+	end
+
+	describe "Iolite" do
+		it "::lazy" do
+			expect(Iolite.lazy { |a, b| a + b }.class).to eq(Iolite::Lazy)
+		end
+#		it "::wrap" do
+#			expect((Iolite.wrap lambda { |a, b| a + b }).call(1, 2).class).to eq(Proc)
+#		end
+	end
+
+	describe "Iolite::Lazy" do
+		first = Iolite::lazy { |x| x }
+		plus = Iolite::lazy { |a, b| a + b }
+		describe "#call" do
+			it "call" do
+				expect(first.call(10)).to eq(10)
+			end
+
+			it "()" do
+				expect(first.(10)).to eq(10)
+			end
+
+			it "call multi arguments" do
+				expect(first.call(10, 2)).to eq(10)
+				expect(plus.call(10, 2)).to eq(12)
+			end
+		end
+
+		describe "#bind" do
+			include Iolite::Placeholders
+			f = Iolite::lazy { |a, b| a + b }
+			it "argument" do
+				expect(f.bind(-3, 1).call()).to eq(-2)
+			end
+			it "argument" do
+				expect(f.bind(arg2, arg1).call(-1, 3)).to eq(2)
+			end
+			it "operator" do
+				expect(Iolite::lazy(&:+).bind(arg2, arg1).call(-1, 3)).to eq(2)
+			end
+		end
+
+		describe "#send" do
+			it "call method" do
+				expect(first.send(:to_s).call(10).class).to eq(String)
+			end
+			it "call method with args" do
+				expect(first.send(:+, 1).call(2)).to eq(3)
+			end
+			include Iolite::Placeholders
+			it "call method with placeholders" do
+				expect(first.send(:+, arg2).call(2, -2)).to eq(0)
+			end
+		end
+
+		describe "#apply" do
+			include Iolite::Placeholders
+			it "call lambda" do
+				expect(arg1.apply(1, 2).call(lambda { |a ,b| a + b })).to eq(3)
+			end
+			it "call Iolite::Lazy" do
+				expect(arg1.apply(1, 2).call(Iolite::lazy { |a ,b| a + b })).to eq(3)
+			end
+		end
+
+		describe "operators" do
+			it "a + b" do
+				expect((first + first).call(1)).to eq(2)
+			end
+			it "a - b" do
+				expect((plus - first).call(2, 3)).to eq(3)
+			end
+			it "a * b" do
+				expect((first * first).call(2)).to eq(4)
+			end
+			it "a[b]" do
+				expect((first[:name]).call({name: :homu})).to eq(:homu)
+			end
+			it "a + {value}" do
+				expect((first + 3).call(4)).to eq(7)
+			end
+			it "==" do
+				expect([1, 2, 3].any? &first == 3).to eq(true)
+			end
+			it "=~" do
+				expect(["homu", "123", "mami"].any? &first =~ /\d+/).to eq(true)
+			end
+			it "!" do
+				expect([1, nil, 6].find_index &!first).to eq(1)
+			end
+		end
+
+		describe "#method_missing" do
+			it "call #length method" do
+				expect(first.length.call("homu")).to eq(4)
+			end
+			it "call #to_s method" do
+				expect(first.to_i.call("1").class).to eq(Fixnum)
+			end
+			it "call Object#*" do
+				# not call method_missing
+				expect(first.class).to eq(Iolite::Lazy)
+			end
+			it "call Object#* from #send" do
+				expect(first.send(:class).call("homu")).to eq(String)
+			end
+		end
+
+		describe "Array block" do
+			it "#map by" do
+				expect((1..3).map &(first + 3)).to eq([4, 5, 6])
+			end
+			it "#inject by" do
+				expect((2..4).inject &(plus)).to eq(9)
+			end
+		end
+	end
+
+	describe "Iolite::Placeholders" do
+		include Iolite::Placeholders
+		it "arg1" do
+			expect(arg1.call(1, 2)).to eq(1)
+		end
+		it "arg1 + arg2" do
+			expect((arg1 + arg2).call(1, 2)).to eq(3)
+		end
+		it "arg1[arg2]" do
+			expect((arg1[arg2]).call([1, 2, 3], 2)).to eq(3)
+		end
+		it "args" do
+			expect((args[arg2]).call(1, 3, 2, 4)).to eq(4)
+		end
+		it "bind" do
+			# expect(arg1.bind(10).call(Iolite.lambda { |x| x + x})).to eq(20)
+		end
+		it "alias _1, arg1" do
+			expect((_1 + _2).call(1, 2)).to eq(3)
+		end
+	end
+
+	describe "Iolite::adaptor" do
+		describe "Adapt callable" do
+			include Iolite::Placeholders
+			class UnCallableFromIolite
+			end
+			it "not callable" do
+				# UnCallableFromIolite.new.class
+				expect(arg1.send(:class).bind(UnCallableFromIolite.new).call(10)).to eq(UnCallableFromIolite)
+			end
+			class CallableFromIolite
+				include Iolite::Adaptor::Callable
+				def call n
+					n
+				end
+			end
+			it "callable" do
+				# CallableFromIolite.new.call("homu")
+				expect(arg1.send(:class).bind(CallableFromIolite.new).call("homu")).to eq(String)
+			end
+			it "wrap" do
+				# expect(arg1.send(:class).bind(Iolite.wrap CallableFromIolite.new).call("homu")).to eq(CallableFromIolite)
+			end
+		end
+	end
+
+	describe "Iolite::Statement" do
+		describe "if_else" do
+			include Iolite::Statement
+			include Iolite::Placeholders
+			it "call then" do
+				f = if_else(arg1 > 0, arg2, nil)
+				expect(f.(10, "yes")).to eq("yes")
+			end
+			it "call else" do
+				f = if_else(arg1 > 0, arg2, nil)
+				expect(f.(-10, "yes")).to eq(nil)
+			end
+		end
+		describe "if_" do
+			describe "if then" do
+				include Iolite::Statement
+				include Iolite::Placeholders
+				it "call then" do
+					f = if_(arg1 > 0)[ arg1, arg1 + arg1 ]
+					expect(f.(10)).to eq(20)
+				end
+				it "call else" do
+					f = if_(arg1 > 0)[ arg1, arg1 + arg1 ]
+					expect(f.(0)).to eq(nil)
+				end
+			end
+			describe "if then else" do
+				include Iolite::Statement
+				include Iolite::Placeholders
+				it "call then" do
+					f = if_(arg1 > 0)[ arg1, arg1 + arg1 ].else_[ arg1, arg1 - arg1 ]
+					expect(f.(10)).to eq(20)
+				end
+				it "call else" do
+					f = if_(arg1 > 0)[ arg1, arg1 + arg1 ].else_[ arg1, arg1 - arg1 ]
+					expect(f.(-10)).to eq(0)
+				end
+			end
+		end
+	end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,2 @@
+$LOAD_PATH.unshift File.expand_path('../../lib', __FILE__)
+require 'iolite'

metadata

@@ -0,0 +1,146 @@
+--- !ruby/object:Gem::Specification
+name: iolite
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+platform: ruby
+authors:
+- manga_osyo
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2015-03-03 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.6'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.6'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - ">="
+      - !ruby/object:Gem::Version
+        version: '0'
+description: unblockable library
+email:
+- manga.osyo@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- ".gitignore"
+- ".rspec"
+- ".travis.yml"
+- Gemfile
+- LICENSE.txt
+- README.md
+- Rakefile
+- docs/iolite.md
+- example/array.rb
+- example/fizzbuzz.rb
+- example/hash.rb
+- example/minimal_implement.rb
+- example/simple.rb
+- example/to_lazy.rb
+- iolite.gemspec
+- lib/iolite.rb
+- lib/iolite/adaptor.rb
+- lib/iolite/adaptor/all.rb
+- lib/iolite/adaptor/apply.rb
+- lib/iolite/adaptor/bind.rb
+- lib/iolite/adaptor/callable.rb
+- lib/iolite/adaptor/define_send_original_methods.rb
+- lib/iolite/adaptor/method_missing.rb
+- lib/iolite/adaptor/operators.rb
+- lib/iolite/adaptor/send.rb
+- lib/iolite/adaptor/to_lazy.rb
+- lib/iolite/adaptor/to_proc.rb
+- lib/iolite/adaptored/array.rb
+- lib/iolite/adaptored/hash.rb
+- lib/iolite/adaptored/iolite_lazy_with_hash.rb
+- lib/iolite/adaptored/object_with_to_lazy.rb
+- lib/iolite/adaptored/proc.rb
+- lib/iolite/adaptored/string.rb
+- lib/iolite/functinal.rb
+- lib/iolite/functinal/bind.rb
+- lib/iolite/functinal/define_iolite_functinal_send_method.rb
+- lib/iolite/functinal/invoke.rb
+- lib/iolite/functinal/send.rb
+- lib/iolite/lazy.rb
+- lib/iolite/placeholders.rb
+- lib/iolite/refinements.rb
+- lib/iolite/refinements/array.rb
+- lib/iolite/refinements/hash.rb
+- lib/iolite/refinements/object_with_to_lazy.rb
+- lib/iolite/refinements/proc.rb
+- lib/iolite/refinements/string.rb
+- lib/iolite/statement.rb
+- lib/iolite/statement/if.rb
+- lib/iolite/statement/if_else.rb
+- lib/iolite/version.rb
+- spec/iolite_adaptored_spec.rb
+- spec/iolite_functinal_spec.rb
+- spec/iolite_lazy_spec.rb
+- spec/iolite_spec.rb
+- spec/spec_helper.rb
+homepage: ''
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.4.5
+signing_key: 
+specification_version: 4
+summary: unblockable library
+test_files:
+- spec/iolite_adaptored_spec.rb
+- spec/iolite_functinal_spec.rb
+- spec/iolite_lazy_spec.rb
+- spec/iolite_spec.rb
+- spec/spec_helper.rb