orangutan 0.0.1 → 0.0.2

data/lib/orangutan/stub_base.rb

@@ -0,0 +1,32 @@
+module Orangutan
+  class StubBase
+    instance_methods.each { |m| undef_method m unless m =~ /^__/ }
+
+    def initialize name, parent, recursive=false
+      @name, @parent, @recursive = name, parent, recursive
+    end
+
+    def method_missing method, *args
+      yield_container, return_container = __react__(method, args)
+      yield yield_container.value if yield_container && block_given?
+      __return__(method, return_container)
+    end
+  private
+    def __return__ method, return_container
+      return return_container.value if return_container
+      return @parent.stub(:"#{@name}/#{method}") if @recursive
+      nil
+    end
+  
+    def __react__ method, args
+      yield_container, return_container = nil, nil
+      @parent.calls << Call.new(@name, method, args)
+      first_match = @parent.first_match(@name, method, args)
+      if first_match
+        first_match.raiser.execute if first_match.raiser
+        yield_container, return_container =  first_match.yield_container, first_match.return_container
+      end
+      return yield_container, return_container
+    end
+  end
+end

data/orangutan.gemspec

@@ -1,62 +1,65 @@
-# -*- encoding: utf-8 -*-
-
-Gem::Specification.new do |s|
-  s.name = %q{orangutan}
-  s.version = "0.0.1"
-
-  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
-  s.authors = ["Mark Ryall"]
-  s.date = %q{2009-05-09}
-  s.description = %q{A mocking library that supports creation of ironruby mock objects (in addition to pure ruby ones)}
-  s.email = %q{mark@ryall.name}
-  s.extra_rdoc_files = [
-    "README"
-  ]
-  s.files = [
-    "README",
-     "Rakefile",
-     "VERSION",
-     "lib/orangutan.rb",
-     "lib/orangutan/call.rb",
-     "lib/orangutan/chantek.rb",
-     "lib/orangutan/clean_slate.rb",
-     "lib/orangutan/container.rb",
-     "lib/orangutan/expectation.rb",
-     "lib/orangutan/raiser.rb",
-     "orangutan.gemspec",
-     "prepare.cmd",
-     "spec/ClassWithANonVirtualMethod.cs",
-     "spec/ClassWithANonVirtualProperty.cs",
-     "spec/ClassWithAVirtualMethod.cs",
-     "spec/ClassWithAVirtualProperty.cs",
-     "spec/Consumer.cs",
-     "spec/IHaveAMethod.cs",
-     "spec/IHaveAProperty.cs",
-     "spec/IHaveAnEvent.cs",
-     "spec/spec_chantek.rb",
-     "spec/spec_chantek_clr.rb",
-     "spec/spec_expectation.rb"
-  ]
-  s.has_rdoc = true
-  s.homepage = %q{http://github.com/markryall/orangutan}
-  s.rdoc_options = ["--charset=UTF-8"]
-  s.require_paths = ["lib"]
-  s.rubyforge_project = %q{orangutan}
-  s.rubygems_version = %q{1.3.1}
-  s.summary = %q{A mock objects library}
-  s.test_files = [
-    "spec/spec_chantek.rb",
-     "spec/spec_chantek_clr.rb",
-     "spec/spec_expectation.rb"
-  ]
-
-  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
-    else
-    end
-  else
-  end
-end
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{orangutan}
+  s.version = "0.0.2"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Mark Ryall"]
+  s.date = %q{2009-05-10}
+  s.description = %q{A mocking library that supports creation of ironruby mock objects (in addition to pure ruby ones)}
+  s.email = %q{mark@ryall.name}
+  s.extra_rdoc_files = [
+    "README"
+  ]
+  s.files = [
+    "README",
+     "Rakefile",
+     "VERSION.yml",
+     "lib/orangutan.rb",
+     "lib/orangutan/call.rb",
+     "lib/orangutan/chantek.rb",
+     "lib/orangutan/clean_slate.rb",
+     "lib/orangutan/container.rb",
+     "lib/orangutan/expectation.rb",
+     "lib/orangutan/raiser.rb",
+     "lib/orangutan/stub_base.rb",
+     "orangutan.gemspec",
+     "prepare.cmd",
+     "spec/clr/ClassWithANonVirtualMethod.cs",
+     "spec/clr/ClassWithANonVirtualProperty.cs",
+     "spec/clr/ClassWithAVirtualMethod.cs",
+     "spec/clr/ClassWithAVirtualProperty.cs",
+     "spec/clr/Consumer.cs",
+     "spec/clr/IHaveAMethod.cs",
+     "spec/clr/IHaveAProperty.cs",
+     "spec/clr/IHaveAnEvent.cs",
+     "spec/spec_chantek.rb",
+     "spec/spec_chantek_clr.rb",
+     "spec/spec_chantek_recurse.rb",
+     "spec/spec_expectation.rb"
+  ]
+  s.has_rdoc = true
+  s.homepage = %q{http://github.com/markryall/orangutan}
+  s.rdoc_options = ["--charset=UTF-8"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{orangutan}
+  s.rubygems_version = %q{1.3.1}
+  s.summary = %q{A mock objects library}
+  s.test_files = [
+    "spec/spec_chantek.rb",
+     "spec/spec_chantek_clr.rb",
+     "spec/spec_chantek_recurse.rb",
+     "spec/spec_expectation.rb"
+  ]
+
+  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
+    else
+    end
+  else
+  end
+end

data/prepare.cmd

@@ -1,11 +1,11 @@
-call path_git
-call path_bacon
-call path_ironruby
-call path_msbuild
-pushd %BACON_HOME%
-git pull
-popd
-pushd %IRONRUBY_HOME%
-git pull
-msbuild Merlin\Main\Languages\Ruby\Ruby.sln
-popd
+call path_git
+call path_bacon
+call path_ironruby
+call path_msbuild
+pushd %BACON_HOME%
+git pull
+popd
+pushd %IRONRUBY_HOME%
+git pull
+msbuild Merlin\Main\Languages\Ruby\Ruby.sln
+popd

data/spec/{ClassWithANonVirtualMethod.cs → clr/ClassWithANonVirtualMethod.cs}

@@ -1,13 +1,13 @@
-using System;
-
-namespace ClassLibrary
-{
-	public class ClassWithANonVirtualMethod : IHaveAMethod
-	{		
-		public bool MyMethod(string parameter)
-		{
-			Console.WriteLine("clr method was called with " + parameter);
-			return true;
-		}
-	}
+using System;
+
+namespace ClassLibrary
+{
+	public class ClassWithANonVirtualMethod : IHaveAMethod
+	{		
+		public bool MyMethod(string parameter)
+		{
+			Console.WriteLine("clr method was called with " + parameter);
+			return true;
+		}
+	}
 }

data/spec/{ClassWithANonVirtualProperty.cs → clr/ClassWithANonVirtualProperty.cs}

@@ -1,22 +1,22 @@
-using System;
-
-namespace ClassLibrary
-{
-	public class ClassWithANonVirtualProperty : IHaveAProperty
-	{
-		private string _MyProperty;
-		public string MyProperty
-		{
-			get
-			{
-				Console.WriteLine("clr getter called");
-				return _MyProperty;
-			}
-			set
-			{
-				Console.WriteLine("clr setter called");
-				_MyProperty = value;
-			}
-		}
-	}
+using System;
+
+namespace ClassLibrary
+{
+	public class ClassWithANonVirtualProperty : IHaveAProperty
+	{
+		private string _MyProperty;
+		public string MyProperty
+		{
+			get
+			{
+				Console.WriteLine("clr getter called");
+				return _MyProperty;
+			}
+			set
+			{
+				Console.WriteLine("clr setter called");
+				_MyProperty = value;
+			}
+		}
+	}
 }

data/spec/{ClassWithAVirtualMethod.cs → clr/ClassWithAVirtualMethod.cs}

@@ -1,13 +1,13 @@
-using System;
-
-namespace ClassLibrary
-{
-	public class ClassWithAnVirtualMethod : IHaveAMethod
-	{		
-		public virtual bool MyMethod(string parameter)
-		{
-			Console.WriteLine("clr method was called with " + parameter);
-			return true;
-		}
-	}
-}
+using System;
+
+namespace ClassLibrary
+{
+	public class ClassWithAnVirtualMethod : IHaveAMethod
+	{		
+		public virtual bool MyMethod(string parameter)
+		{
+			Console.WriteLine("clr method was called with " + parameter);
+			return true;
+		}
+	}
+}

data/spec/{ClassWithAVirtualProperty.cs → clr/ClassWithAVirtualProperty.cs}

@@ -1,22 +1,22 @@
-using System;
-
-namespace ClassLibrary
-{
-	public class ClassWithAVirtualProperty : IHaveAProperty
-	{
-		private string _MyProperty;
-		public virtual string MyProperty
-		{
-			get
-			{
-				Console.WriteLine("clr getter called");
-				return _MyProperty;
-			}
-			set
-			{
-				Console.WriteLine("clr setter called");
-				_MyProperty = value;
-			}
-		}
-	}
-}
+using System;
+
+namespace ClassLibrary
+{
+	public class ClassWithAVirtualProperty : IHaveAProperty
+	{
+		private string _MyProperty;
+		public virtual string MyProperty
+		{
+			get
+			{
+				Console.WriteLine("clr getter called");
+				return _MyProperty;
+			}
+			set
+			{
+				Console.WriteLine("clr setter called");
+				_MyProperty = value;
+			}
+		}
+	}
+}

data/spec/{Consumer.cs → clr/Consumer.cs}

@@ -1,30 +1,30 @@
-using System;
-
-namespace ClassLibrary
-{
-	public class Consumer 
-	{
-		private int count = 0;
-		
-		public void CallMethod(IHaveAMethod consumable)
-		{
-			consumable.MyMethod("thing");
-		}
-		
-		public void RegisterEvent(IHaveAnEvent e)
-		{
-			e.MyEvent += (s,ev) => Console.WriteLine(s);
-		}
-		
-		public void CallSetter(IHaveAProperty p)
-		{
-			p.MyProperty = ""+count;
-			count++;
-		}
-
-		public void CallGetter(IHaveAProperty p)
-		{
-			Console.WriteLine(p.MyProperty);
-		}
-	}
+using System;
+
+namespace ClassLibrary
+{
+	public class Consumer 
+	{
+		private int count = 0;
+		
+		public void CallMethod(IHaveAMethod consumable)
+		{
+			consumable.MyMethod("thing");
+		}
+		
+		public void RegisterEvent(IHaveAnEvent e)
+		{
+			e.MyEvent += (s,ev) => Console.WriteLine(s);
+		}
+		
+		public void CallSetter(IHaveAProperty p)
+		{
+			p.MyProperty = ""+count;
+			count++;
+		}
+
+		public void CallGetter(IHaveAProperty p)
+		{
+			Console.WriteLine(p.MyProperty);
+		}
+	}
 }

data/spec/{IHaveAMethod.cs → clr/IHaveAMethod.cs}

@@ -1,9 +1,9 @@
-using System;
-
-namespace ClassLibrary
-{
-	public interface IHaveAMethod
-	{
-		bool MyMethod(string parameter);
-	}
+using System;
+
+namespace ClassLibrary
+{
+	public interface IHaveAMethod
+	{
+		bool MyMethod(string parameter);
+	}
 }

data/spec/{IHaveAProperty.cs → clr/IHaveAProperty.cs}

@@ -1,9 +1,9 @@
-using System;
-
-namespace ClassLibrary
-{
-	public interface IHaveAProperty
-	{
-		String MyProperty { get; set; }
-	}
-}
+using System;
+
+namespace ClassLibrary
+{
+	public interface IHaveAProperty
+	{
+		String MyProperty { get; set; }
+	}
+}

data/spec/{IHaveAnEvent.cs → clr/IHaveAnEvent.cs}

@@ -1,9 +1,9 @@
-using System;
-
-namespace ClassLibrary
-{
-	public interface IHaveAnEvent
-	{
-		event EventHandler<EventArgs> MyEvent;
-	}
+using System;
+
+namespace ClassLibrary
+{
+	public interface IHaveAnEvent
+	{
+		event EventHandler<EventArgs> MyEvent;
+	}
 }