1 files changed, 95 insertions, 0 deletions
diff --git a/spec/ruby/optional/capi/range_spec.rb b/spec/ruby/optional/capi/range_spec.rb
new file mode 100644
index 0000000000..aa16f9773e
--- /dev/null
+++ b/spec/ruby/optional/capi/range_spec.rb
@@ -0,0 +1,95 @@
+require File.expand_path('../spec_helper', __FILE__)
+
+load_extension("range")
+
+describe "C-API Range function" do
+  before :each do
+    @s = CApiRangeSpecs.new
+  end
+
+  describe "rb_range_new" do
+    it "constructs a range using the given start and end" do
+      range = @s.rb_range_new('a', 'c')
+      range.should == ('a'..'c')
+
+      range.first.should == 'a'
+      range.last.should == 'c'
+    end
+
+    it "includes the end object when the third parameter is omitted or false" do
+      @s.rb_range_new('a', 'c').to_a.should == ['a', 'b', 'c']
+      @s.rb_range_new(1, 3).to_a.should == [1, 2, 3]
+
+      @s.rb_range_new('a', 'c', false).to_a.should == ['a', 'b', 'c']
+      @s.rb_range_new(1, 3, false).to_a.should == [1, 2, 3]
+
+      @s.rb_range_new('a', 'c', true).to_a.should == ['a', 'b']
+      @s.rb_range_new(1, 3, 1).to_a.should == [1, 2]
+
+      @s.rb_range_new(1, 3, mock('[1,2]')).to_a.should == [1, 2]
+      @s.rb_range_new(1, 3, :test).to_a.should == [1, 2]
+    end
+
+    it "raises an ArgumentError when the given start and end can't be compared by using #<=>" do
+      lambda { @s.rb_range_new(1, mock('x'))         }.should raise_error(ArgumentError)
+      lambda { @s.rb_range_new(mock('x'), mock('y')) }.should raise_error(ArgumentError)
+    end
+  end
+
+  describe "rb_range_values" do
+    it "stores the range properties" do
+      beg, fin, excl = @s.rb_range_values(10..20)
+      beg.should == 10
+      fin.should == 20
+      excl.should be_false
+    end
+
+    it "stores the range properties of non-Range object" do
+      range_like = mock('range')
+
+      def range_like.begin
+        10
+      end
+
+      def range_like.end
+        20
+      end
+
+      def range_like.exclude_end?
+        false
+      end
+
+      beg, fin, excl = @s.rb_range_values(range_like)
+      beg.should == 10
+      fin.should == 20
+      excl.should be_false
+    end
+  end
+
+  describe "rb_range_beg_len" do
+    it "returns correct begin, length and result" do
+      r = 2..5
+      begp, lenp, result = @s.rb_range_beg_len(r, 0, 0, 10, 0)
+      result.should be_true
+      begp.should == 2
+      lenp.should == 4
+    end
+
+    it "returns nil when not in range" do
+      r = 2..5
+      begp, lenp, result = @s.rb_range_beg_len(r, 0, 0, 1, 0)
+      result.should be_nil
+    end
+
+    it "raises a RangeError when not in range and err is 1" do
+      r = -5..-1
+      lambda { @s.rb_range_beg_len(r, 0, 0, 1, 1) }.should raise_error(RangeError)
+    end
+
+    it "returns nil when not in range and err is 0" do
+      r = -5..-1
+      begp, lenp, result =  @s.rb_range_beg_len(r, 0, 0, 1, 0)
+      result.should be_nil
+    end
+  end
+end