contextr 0.0.1 → 0.0.2

data/test/contextr/test_contextr.rb

@@ -1,165 +1,7 @@
 require File.dirname(__FILE__) + '/../test_helper'
 
-class UnitContextRFoo
-  layer :pre, :post, :wrap
-  layer :stop_wrap, :stop_pre, :stop_post
-  layer :order_wrap, :order_pre, :order_post
-  layer :group_pre, :group_post
-  
-  def bar( sum )
-    sum + 0b00100
-  end
-
-  pre.pre :bar do | nature |
-    nature.arguments[ 0 ] += 0b00010
-  end
-
-  post.post :bar do | nature |
-    nature.return_value += 0b01000
-  end
-
-  wrap.wrap :bar do | nature |
-    nature.arguments[ 0 ] += 0b00001
-    nature.call_next
-    nature.return_value += 0b10000
-  end
-  
-  stop_pre.pre :bar do | nature |
-    nature.break! nature.arguments[0]
-  end
-  stop_wrap.wrap :bar do | nature |
-    nature.break! nature.arguments[0]
-  end
-  stop_post.post :bar do | nature |
-    nature.break! nature.return_value
-  end
-  
-  order_pre.pre :bar do | nature |
-    nature.break! :pre
-  end
-  
-  order_post.post :bar do | nature |
-    nature.break! :post
-  end
-  
-  order_wrap.wrap :bar do | nature |
-    nature.break! :wrap
-  end
-  
-  group_pre.pre :bar do | nature |
-    nature.return_value = :pre
-  end
-  
-  group_pre.pre :bar do | nature |
-    nature.break! nature.return_value
-  end
-
-  group_post.post :bar do | nature |
-    nature.return_value = :post
-  end
-  
-  group_post.post :bar do | nature |
-    nature.break! nature.return_value
-  end
-end
-
-
 class ContextRTest < Test::Unit::TestCase
-  def setup
-    @foo = UnitContextRFoo.new
-  end
-  
-  def test_01_layer_activiation
-    assert_equal 0b00100, @foo.bar( 0 )
-    
-    ContextR.with_layers :wrap do
-      assert_equal 0b10101, @foo.bar( 0 )
-      
-      ContextR.without_layers :wrap do
-        assert_equal 0b00100, @foo.bar( 0 )
-      end
-      
-      assert_equal 0b10101, @foo.bar( 0 )
-    end
-    
-    assert_equal 0b00100, @foo.bar( 0 )
-  end
-  
-  def test_02_cascading_layers
-    assert_equal 0b00100, @foo.bar( 0 )
-    
-    ContextR.with_layers :pre do
-      assert_equal 0b00110, @foo.bar( 0 )
-      
-      ContextR.with_layers :post do
-        assert_equal 0b01110, @foo.bar( 0 )
-        
-        ContextR.with_layers :wrap do
-          assert_equal 0b11111, @foo.bar( 0 )
-        end
-        
-        assert_equal 0b01110, @foo.bar( 0 )
-      end
-      
-      assert_equal 0b00110, @foo.bar( 0 )
-    end
-    
-    assert_equal 0b00100, @foo.bar( 0 )
-  end
-  
-  def test_03_breaking_behaviour
-    ContextR.with_layers :pre, :post, :stop_wrap do
-      assert_equal 0b00010, @foo.bar( 0 )
-    end
-  end
-  
-  def test_04_ordering_by_selectors
-    # pre before post
-    ContextR.with_layers :order_pre, :order_post do
-      assert_equal :pre, @foo.bar( 0 )
-    end
-    # pre before wrap
-    ContextR.with_layers :order_wrap, :order_pre do
-      assert_equal :pre, @foo.bar( 0 )
-    end
-    # wrap before body
-    ContextR.with_layers :order_wrap do
-      assert_equal :wrap, @foo.bar( 0 )
-    end
-    # wrap before post
-    ContextR.with_layers :order_wrap, :order_post do
-      assert_equal :wrap, @foo.bar( 0 )
-    end
-    # To be completed...
-  end
-  
-  def test_05_ordering_by_layers
-    ContextR.with_layers :wrap, :stop_wrap do
-      assert_equal 0b00000, @foo.bar( 0 )
-    end
-    ContextR.with_layers :stop_wrap, :wrap do
-      assert_equal 0b00001, @foo.bar( 0 )
-    end
-    ContextR.with_layers :pre, :stop_pre do
-      assert_equal 0b00000, @foo.bar( 0 )
-    end
-    ContextR.with_layers :stop_pre, :pre do
-      assert_equal 0b00010, @foo.bar( 0 )
-    end
-    ContextR.with_layers :post, :stop_post do
-      assert_equal 0b01100, @foo.bar( 0 )
-    end
-    ContextR.with_layers :stop_post, :post do
-      assert_equal 0b00100, @foo.bar( 0 )
-    end
-  end
-  
-  def test_06_ordering_within_groups
-    ContextR.with_layers :group_pre do
-      assert_equal nil, @foo.bar( 0 )
-    end
-    ContextR.with_layers :group_post do
-      assert_equal :post, @foo.bar( 0 )
-    end
+  def test_truth
+    assert true
   end
 end

data/website/index.html

@@ -68,6 +68,9 @@ require 'contextr'</pre>
 
 
 <pre syntax="ruby">
+require "rubygems" 
+require "contextr" 
+
 class Person
   attr_accessor :name, :address, :university
 
@@ -118,31 +121,36 @@ end
 hpi = University.new( "Hasso-Plattner-Institut", "Potsdam" )
 somePerson = Person.new( "Gregor Schmidt", "Berlin", hpi )
 
+puts 
 puts somePerson
-ContextR::with_layers :address do
+ContextR::with_layers :education do
+  puts 
   puts somePerson
 
-  ContextR::with_layers :education do
+  ContextR::with_layers :address do
+    puts 
     puts somePerson
 
-    ContextR::without_layers :address do
+    ContextR::without_layers :education do
+      puts 
       puts somePerson
     end
   end
 end
+puts 
 </pre>
 The above code prints:
 
 <pre>
 Name: Gregor Schmidt
 
-Name: Gregor Schmidt; Address: Berlin
+Name: Gregor Schmidt;
+[Education] Name: Hasso-Plattner-Institut
 
 Name: Gregor Schmidt; Address: Berlin;
 [Education] Name: Hasso-Plattner-Institut; Address: Potsdam
 
-Name: Gregor Schmidt;
-[Education] Name: Hasso-Plattner-Institut
+Name: Gregor Schmidt; Address: Berlin
 </pre>
 
 	<p>You may find other examples in the <code>examples</code> folder.</p>
@@ -154,7 +162,7 @@ Name: Gregor Schmidt;
 	<ul>
 	<li><a href="http://rubyforge.org/projects/contextr">Rubyforge Project Page</a></li>
 		<li><a href="http://www.nach-vorne.de">Author&#8217;s Development Blog &#8211; The Ruby Ahead</a></li>
-		<li><a href="http://www.ohloh.net/projects/5037">Ohloh Statistics on ContextR</a></li>
+		<li><a href="http://www.ohloh.net/projects/5037">ContextR Statistics on ohloh</a></li>
 	</ul>
 
 
@@ -169,7 +177,7 @@ Name: Gregor Schmidt;
 
 	<p>Comments are welcome. Send an email to <a href="mailto:ruby@schmidtwisser.de">Gregor Schmidt</a></p>
     <p class="coda">
-      <a href="mailto:drnicwilliams@gmail.com">Dr Nic</a>, 8th May 2007<br>
+      <a href="mailto:drnicwilliams@gmail.com">Dr Nic</a>, 9th May 2007<br>
       Theme extended from <a href="http://rb2js.rubyforge.org/">Paul Battley</a>
     </p>
 </div>

data/website/index.txt

@@ -25,6 +25,9 @@ and ContextR will be ready to use.
 h2. Demonstration of usage
 
 <pre syntax="ruby">
+require "rubygems"
+require "contextr" 
+
 class Person
   attr_accessor :name, :address, :university
 
@@ -72,34 +75,40 @@ class University
   end
 end
 
+
 hpi = University.new( "Hasso-Plattner-Institut", "Potsdam" )
 somePerson = Person.new( "Gregor Schmidt", "Berlin", hpi )
 
+puts 
 puts somePerson
-ContextR::with_layers :address do
+ContextR::with_layers :education do
+  puts 
   puts somePerson
 
-  ContextR::with_layers :education do
+  ContextR::with_layers :address do
+    puts 
     puts somePerson
 
-    ContextR::without_layers :address do
+    ContextR::without_layers :education do
+      puts 
       puts somePerson
     end
   end
 end
+puts 
 </pre>
 The above code prints:
 
 <pre>
 Name: Gregor Schmidt
 
-Name: Gregor Schmidt; Address: Berlin
+Name: Gregor Schmidt;
+[Education] Name: Hasso-Plattner-Institut
 
 Name: Gregor Schmidt; Address: Berlin;
 [Education] Name: Hasso-Plattner-Institut; Address: Potsdam
 
-Name: Gregor Schmidt;
-[Education] Name: Hasso-Plattner-Institut
+Name: Gregor Schmidt; Address: Berlin
 </pre>
 
 You may find other examples in the <code>examples</code> folder.
@@ -108,7 +117,7 @@ h2. Other resources
 
 * "Rubyforge Project Page":http://rubyforge.org/projects/contextr
 * "Author's Development Blog - The Ruby Ahead":http://www.nach-vorne.de
-* "Ohloh Statistics on ContextR":http://www.ohloh.net/projects/5037
+* "ContextR Statistics on ohloh":http://www.ohloh.net/projects/5037
 
 h2. License
 

metadata

@@ -3,12 +3,11 @@ rubygems_version: 0.9.2
 specification_version: 1
 name: contextr
 version: !ruby/object:Gem::Version 
-  version: 0.0.1
-date: 2007-05-08 00:00:00 +02:00
+  version: 0.0.2
+date: 2007-05-10 00:00:00 +02:00
 summary: The goal is to equip Ruby with an API to allow context-oriented programming.
 require_paths: 
 - lib
-- ext
 email: ruby@schmidtwisser.de
 homepage: http://contextr.rubyforge.org
 rubyforge_project: contextr
@@ -38,19 +37,21 @@ files:
 - Rakefile
 - examples/education.rb
 - examples/fibonacci.rb
-- ext/dynamic.rb
-- ext/method_nature.rb
 - lib/contextr.rb
 - lib/contextr/contextr.rb
+- lib/contextr/layer.rb
 - lib/contextr/version.rb
 - lib/core_ext/class.rb
 - lib/core_ext/module.rb
 - lib/core_ext/proc.rb
+- lib/ext/dynamic.rb
+- lib/ext/method_nature.rb
 - rake/group_spec_task.rb
 - rake/specific_group_spec_task.rb
 - scripts/txt2html
 - setup.rb
 - spec/contextr/contextr_api_spec.rb
+- spec/contextr/contextr_functional_spec.rb
 - spec/core_ext/module_spec.rb
 - spec/core_ext/proc_spec.rb
 - spec/spec_helper.rb

data/ext/method_nature.rb

@@ -1,17 +0,0 @@
-unless Object.const_defined? "MethodNatureSuperClass"
-  MethodNatureSuperClass = Struct.new(:arguments, :return_value, :break, :block)
-end
-class MethodNature < MethodNatureSuperClass 
-  def break!( *value )
-    self.break = true
-    self.return_value = value.first unless value.empty?
-  end
-
-  def call_next
-    block.call( *arguments )
-  end
-
-  def call_next_with( *args )
-    block.call( *args )
-  end
-end