nkpart-prohax 1.0.1

data/History.txt

@@ -0,0 +1,6 @@
+1770 Captain Cook landed on the East coast of Australia.
+
+== 0.0.1 2008-11-12
+
+* 1 major enhancement:
+  * Initial release

data/Manifest.txt

@@ -0,0 +1,28 @@
+History.txt
+Manifest.txt
+PostInstall.txt
+README.txt
+Rakefile
+coverage/index.html
+coverage/lib-prohax-box_rb.html
+coverage/lib-prohax-either_rb.html
+coverage/lib-prohax-let_in_rb.html
+coverage/lib-prohax-strucked_rb.html
+coverage/lib-prohax_rb.html
+lib/prohax.rb
+lib/prohax/box.rb
+lib/prohax/either.rb
+lib/prohax/let_in.rb
+lib/prohax/strucked.rb
+prohax.gemspec
+script/console
+script/destroy
+script/generate
+spec/box_spec.rb
+spec/either_spec.rb
+spec/let_in_syntax_spec.rb
+spec/spec.opts
+spec/spec_helper.rb
+spec/strucked_spec.rb
+tasks/rspec.rake
+test_gem.sh

data/PostInstall.txt

@@ -0,0 +1 @@
+Because hax is pro and pro is good.

data/README.txt

@@ -0,0 +1,71 @@
+= prohax
+
+* http://github.com/nkpart/prohax
+
+== What?
+
+Just some hax that I use.
+
+== Contents
+
+* Let-in - a neat syntax that's a bit like haskell. Contents of the hash supplied to `let()`
+  are defined as functions on a container, on which the block passed to `in` is instance_eval'd with.
+
+ let( :awesome => proc { |n| "#{n} is awesome." }).in { [1,2,3].map { |e|  awesome(e) }
+
+* Strucked - a class builder, that just instantiates instance vars
+  
+  # before
+  class Foo
+    def initialize a, b
+      @a = a
+      @b = b
+    end
+  end
+  
+  # after
+  class Foo < Strucked.build(:a, :b)
+  end
+  
+* Kernel#either - a kind of either-like thing.
+
+  # If no exceptions are thrown, `failure` will be nil and `success` will be the result of the block.
+  # Otherwise, success will be nil and failure will hold the exception
+  success, failure = either {
+    raise "fail"
+  }
+  failure # <= RuntimeError('fail')
+  
+  success, failure = either { 5 }
+  success # <= 5
+  
+
+
+== SYNOPSIS:
+
+  FIX (code sample of usage)
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2008 FIXME full name
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+'Software'), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED 'AS IS', WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/Rakefile

@@ -0,0 +1,20 @@
+%w[rubygems rake rake/clean fileutils newgem rubigen].each { |f| require f }
+require File.dirname(__FILE__) + '/lib/prohax'
+
+# Generate all the Rake tasks
+# Run 'rake -T' to see list of generated tasks (from gem root directory)
+$hoe = Hoe.new('prohax', Prohax::VERSION) do |p|
+  p.developer('Nick Partridge', 'nkpart@gmail.com')
+  p.changes              = p.paragraphs_of("History.txt", 0..1).join("\n\n")
+  p.rubyforge_name       = p.name # TODO this is default value  
+  p.clean_globs |= %w[**/.DS_Store tmp *.log]
+  path = (p.rubyforge_name == p.name) ? p.rubyforge_name : "\#{p.rubyforge_name}/\#{p.name}"
+  p.remote_rdoc_dir = File.join(path.gsub(/^#{p.rubyforge_name}\/?/,''), 'rdoc')
+  p.rsync_args = '-av --delete --ignore-errors'
+end
+
+require 'newgem/tasks' # load /tasks/*.rake
+Dir['tasks/**/*.rake'].each { |t| load t }
+
+task "build" => ["spec", "verify_rcov"]
+task :default => [:build]

data/lib/prohax.rb

@@ -0,0 +1,10 @@
+$: << File.expand_path(File.dirname(__FILE__))
+
+module Prohax
+  VERSION = '1.0.1'
+end
+
+require 'prohax/strucked'
+require 'prohax/let_in'
+require 'prohax/either'
+require 'prohax/box'

data/lib/prohax/box.rb

@@ -0,0 +1,5 @@
+class Object
+  def box
+    self.is_a?(Array) ? self : [self]
+  end
+end

data/lib/prohax/either.rb

@@ -0,0 +1,7 @@
+module Kernel
+  def either
+    [yield, nil] 
+  rescue Exception => e
+    [nil, e]
+  end
+end

data/lib/prohax/let_in.rb

@@ -0,0 +1,32 @@
+require 'prohax/strucked'
+
+class Container
+  def initialize defines
+    defines.each do |key, value|
+      if value.respond_to? :call then
+        self.class.class_eval {
+          define_method(key) { |*args| value.call *args }
+        }
+      else
+        self.class.class_eval {
+          define_method(key) { value }
+        }
+      end
+    end
+  end
+end
+  
+class LetProxy < Strucked.build(:defines)
+  # def initialize defines
+  #   @defines = defines
+  # end
+  def in &blk
+    Container.new(@defines).instance_eval &blk
+  end
+end
+
+module Kernel    
+  def let defines
+    LetProxy.new(defines)
+  end
+end

data/lib/prohax/strucked.rb

@@ -0,0 +1,21 @@
+
+class Strucked
+  def self.build *fields
+    cls = Class.new
+    cls.class_eval <<EOS
+      def self.fields
+        #{fields.inspect}
+      end
+      
+      def initialize *values
+        if self.class.fields.size != values.size
+          raise ArgumentError.new("Wrong number of arguments, expected \#\{self.class.fields.size\} got \#\{values.size\}")
+        end
+        self.class.fields.zip(values).each do |fld, value|
+          self.instance_variable_set("@\#\{fld\}", value)
+        end
+      end
+EOS
+    cls
+  end
+end

data/prohax.gemspec

@@ -0,0 +1,34 @@
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{prohax}
+  s.version = "1.0.1"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Nick Partridge"]
+  s.date = %q{2008-11-18}
+  s.description = %q{}
+  s.email = ["nkpart@gmail.com"]
+  s.extra_rdoc_files = ["History.txt", "Manifest.txt", "PostInstall.txt", "README.txt"]
+  s.files = ["History.txt", "Manifest.txt", "PostInstall.txt", "README.txt", "Rakefile", "coverage/index.html", "coverage/lib-prohax-box_rb.html", "coverage/lib-prohax-either_rb.html", "coverage/lib-prohax-let_in_rb.html", "coverage/lib-prohax-strucked_rb.html", "coverage/lib-prohax_rb.html", "lib/prohax.rb", "lib/prohax/box.rb", "lib/prohax/either.rb", "lib/prohax/let_in.rb", "lib/prohax/strucked.rb", "prohax.gemspec", "script/console", "script/destroy", "script/generate", "spec/box_spec.rb", "spec/either_spec.rb", "spec/let_in_syntax_spec.rb", "spec/spec.opts", "spec/spec_helper.rb", "spec/strucked_spec.rb", "tasks/rspec.rake", "test_gem.sh"]
+  s.has_rdoc = true
+  s.homepage = %q{http://github.com/nkpart/prohax}
+  s.rdoc_options = ["--main", "README.txt"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{prohax}
+  s.rubygems_version = %q{1.3.1}
+  s.summary = %q{}
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 2
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+      s.add_development_dependency(%q<hoe>, [">= 1.8.0"])
+    else
+      s.add_dependency(%q<hoe>, [">= 1.8.0"])
+    end
+  else
+    s.add_dependency(%q<hoe>, [">= 1.8.0"])
+  end
+end

data/script/console

@@ -0,0 +1,10 @@
+#!/usr/bin/env ruby
+# File: script/console
+irb = RUBY_PLATFORM =~ /(:?mswin|mingw)/ ? 'irb.bat' : 'irb'
+
+libs =  " -r irb/completion"
+# Perhaps use a console_lib to store any extra methods I may want available in the cosole
+# libs << " -r #{File.dirname(__FILE__) + '/../lib/console_lib/console_logger.rb'}"
+libs <<  " -r #{File.dirname(__FILE__) + '/../lib/prohax.rb'}"
+puts "Loading prohax gem"
+exec "#{irb} #{libs} --simple-prompt"

data/script/destroy

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+APP_ROOT = File.expand_path(File.join(File.dirname(__FILE__), '..'))
+
+begin
+  require 'rubigen'
+rescue LoadError
+  require 'rubygems'
+  require 'rubigen'
+end
+require 'rubigen/scripts/destroy'
+
+ARGV.shift if ['--help', '-h'].include?(ARGV[0])
+RubiGen::Base.use_component_sources! [:rubygems, :newgem, :newgem_theme, :test_unit]
+RubiGen::Scripts::Destroy.new.run(ARGV)

data/script/generate

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+APP_ROOT = File.expand_path(File.join(File.dirname(__FILE__), '..'))
+
+begin
+  require 'rubigen'
+rescue LoadError
+  require 'rubygems'
+  require 'rubigen'
+end
+require 'rubigen/scripts/generate'
+
+ARGV.shift if ['--help', '-h'].include?(ARGV[0])
+RubiGen::Base.use_component_sources! [:rubygems, :newgem, :newgem_theme, :test_unit]
+RubiGen::Scripts::Generate.new.run(ARGV)

data/spec/box_spec.rb

@@ -0,0 +1,13 @@
+require File.dirname(__FILE__) + '/spec_helper.rb'
+
+describe "the box function" do
+  it "should wrap singles in arrays" do
+    5.box.should == [5]
+    {}.box.should == [{}]
+  end
+
+  it "should leave arrays alone" do
+    [1].box.should == [1]
+  end
+end
+

data/spec/either_spec.rb

@@ -0,0 +1,17 @@
+require File.dirname(__FILE__) + '/spec_helper.rb'
+
+describe "the either function" do
+  it "should be [nil, exception] in case of failure" do
+    f = ArgumentError.new "fail"
+    left, right = either { raise f }
+    left.should be_nil
+    right.should == f
+  end
+
+  it "should be [result, nil] in case of success" do
+    left, right = either { 5 }
+    left.should == 5
+    right.should be_nil
+  end
+end
+

data/spec/let_in_syntax_spec.rb

@@ -0,0 +1,19 @@
+require File.dirname(__FILE__) + '/spec_helper.rb'
+
+describe "The let().in {} syntax" do
+  it "should be let-like and in-ish" do
+    let(:foo => 5 ).in { foo }.should == 5
+  end
+
+  it "should be mad" do
+    x = 5
+    let(
+      :plus => proc { |a,b| a + b },
+      :times => proc { |a,b| a * b },
+      :five => proc { 5 },
+      :fast_five => 5
+    ).in { 
+      plus(x, times(five, plus(1, fast_five)))
+    }.should == 35
+  end
+end

data/spec/spec.opts

@@ -0,0 +1 @@
+--colour

data/spec/spec_helper.rb

@@ -0,0 +1,10 @@
+begin
+  require 'spec'
+rescue LoadError
+  require 'rubygems'
+  gem 'rspec'
+  require 'spec'
+end
+
+$:.unshift(File.dirname(__FILE__) + '/../lib')
+require 'prohax'

data/spec/strucked_spec.rb

@@ -0,0 +1,34 @@
+require File.dirname(__FILE__) + '/spec_helper.rb'
+
+describe Strucked do
+  it "should create a class with instance variables set" do
+    x = Strucked.build(:foo).new 5
+    x.instance_variable_get("@foo").should == 5
+  end
+
+  it "should fail on create if the number of args is wrong" do
+    proc { 
+      Strucked.build(:foo, :bar).new("a")
+    }.should raise_error
+  end
+  
+  it "should not fail if multiple Struckeds are used" do
+    f = Strucked.build(:f)
+    a = Strucked.build(:a, :b)
+    
+    f.new(1).instance_variable_get("@f").should == 1
+    a.new(1,2).instance_variable_get("@b").should == 2
+  end
+  
+  it "should work with inheritance" do
+    class C < Strucked.build(:c); end
+    C.fields.should == [:c]
+    C.new(5).instance_variable_get("@c").should == 5 
+  end
+  
+  it "does not create accessors" do
+    proc { Strucked.new(:foo).new(5).foo }.should raise_error
+  end
+
+end
+

data/tasks/rspec.rake

@@ -0,0 +1,29 @@
+begin
+  require 'spec'
+rescue LoadError
+  require 'rubygems'
+  require 'spec'
+end
+begin
+  require 'spec/rake/spectask'
+  require 'spec/rake/verify_rcov'
+rescue LoadError
+  puts <<-EOS
+To use rspec for testing you must install rspec gem:
+    gem install rspec
+EOS
+  exit(0)
+end
+
+desc "coverage"
+RCov::VerifyTask.new do |t|
+  t.threshold = 100
+end
+
+desc "Run the specs under spec/models"
+Spec::Rake::SpecTask.new do |t|
+  t.spec_opts = ['--options', "spec/spec.opts"]
+  t.spec_files = FileList['spec/**/*_spec.rb']
+  t.rcov_opts = ['--exclude', 'spec']
+  t.rcov = true
+end

data/test_gem.sh

@@ -0,0 +1,3 @@
+rake manifest
+rake package
+sudo gem install pkg/prohax-1.0.1.gem

metadata

@@ -0,0 +1,93 @@
+--- !ruby/object:Gem::Specification 
+name: nkpart-prohax
+version: !ruby/object:Gem::Version 
+  version: 1.0.1
+platform: ruby
+authors: 
+- Nick Partridge
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2008-11-18 00:00:00 -08:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: hoe
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.8.0
+    version: 
+description: ""
+email: 
+- nkpart@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- History.txt
+- Manifest.txt
+- PostInstall.txt
+- README.txt
+files: 
+- History.txt
+- Manifest.txt
+- PostInstall.txt
+- README.txt
+- Rakefile
+- coverage/index.html
+- coverage/lib-prohax-box_rb.html
+- coverage/lib-prohax-either_rb.html
+- coverage/lib-prohax-let_in_rb.html
+- coverage/lib-prohax-strucked_rb.html
+- coverage/lib-prohax_rb.html
+- lib/prohax.rb
+- lib/prohax/box.rb
+- lib/prohax/either.rb
+- lib/prohax/let_in.rb
+- lib/prohax/strucked.rb
+- prohax.gemspec
+- script/console
+- script/destroy
+- script/generate
+- spec/box_spec.rb
+- spec/either_spec.rb
+- spec/let_in_syntax_spec.rb
+- spec/spec.opts
+- spec/spec_helper.rb
+- spec/strucked_spec.rb
+- tasks/rspec.rake
+- test_gem.sh
+has_rdoc: true
+homepage: http://github.com/nkpart/prohax
+post_install_message: 
+rdoc_options: 
+- --main
+- README.txt
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: prohax
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: ""
+test_files: []
+