require_relative '../../spec_helper' require_relative 'fixtures/classes' describe :kernel_integer, shared: true do it "returns a Bignum for a Bignum" do Integer(2e100).should == 2e100 end it "returns a Fixnum for a Fixnum" do Integer(100).should == 100 end it "raises a TypeError when to_int returns not-an-Integer object and to_i returns nil" do obj = mock("object") obj.should_receive(:to_int).and_return("1") obj.should_receive(:to_i).and_return(nil) -> { Integer(obj) }.should raise_error(TypeError) end it "return a result of to_i when to_int does not return an Integer" do obj = mock("object") obj.should_receive(:to_int).and_return("1") obj.should_receive(:to_i).and_return(42) Integer(obj).should == 42 end it "raises a TypeError when passed nil" do -> { Integer(nil) }.should raise_error(TypeError) end it "returns an Integer object" do Integer(2).should be_an_instance_of(Integer) Integer(9**99).should be_an_instance_of(Integer) end it "truncates Floats" do Integer(3.14).should == 3 Integer(90.8).should == 90 end it "calls to_i on Rationals" do Integer(Rational(8,3)).should == 2 Integer(3.quo(2)).should == 1 end it "returns the value of to_int if the result is a Fixnum" do obj = mock("object") obj.should_receive(:to_int).and_return(1) obj.should_not_receive(:to_i) Integer(obj).should == 1 end it "returns the value of to_int if the result is a Bignum" do obj = mock("object") obj.should_receive(:to_int).and_return(2 * 10**100) obj.should_not_receive(:to_i) Integer(obj).should == 2 * 10**100 end it "calls to_i on an object whose to_int returns nil" do obj = mock("object") obj.should_receive(:to_int).and_return(nil) obj.should_receive(:to_i).and_return(1) Integer(obj).should == 1 end it "raises a TypeError if to_i returns a value that is not an Integer" do obj = mock("object") obj.should_receive(:to_i).and_return("1") -> { Integer(obj) }.should raise_error(TypeError) end it "raises a TypeError if no to_int or to_i methods exist" do obj = mock("object") -> { Integer(obj) }.should raise_error(TypeError) end it "raises a TypeError if to_int returns nil and no to_i exists" do obj = mock("object") obj.should_receive(:to_i).and_return(nil) -> { Integer(obj) }.should raise_error(TypeError) end it "raises a FloatDomainError when passed NaN" do -> { Integer(nan_value) }.should raise_error(FloatDomainError) end it "raises a FloatDomainError when passed Infinity" do -> { Integer(infinity_value) }.should raise_error(FloatDomainError) end describe "when passed exception: false" do describe "and to_i returns a value that is not an Integer" do it "swallows an error" do obj = mock("object") obj.should_receive(:to_i).and_return("1") Integer(obj, exception: false).should == nil end end describe "and no to_int or to_i methods exist" do it "swallows an error" do obj = mock("object") Integer(obj, exception: false).should == nil end end describe "and to_int returns nil and no to_i exists" do it "swallows an error" do obj = mock("object") obj.should_receive(:to_i).and_return(nil) Integer(obj, exception: false).should == nil end end describe "and passed NaN" do it "swallows an error" do Integer(nan_value, exception: false).should == nil end end describe "and passed Infinity" do it "swallows an error" do Integer(infinity_value, exception: false).should == nil end end describe "and passed nil" do it "swallows an error" do Integer(nil, exception: false).should == nil end end describe "and passed a String that contains numbers" do it "normally parses it and returns an Integer" do Integer("42", exception: false).should == 42 end end describe "and passed a String that can't be converted to an Integer" do it "swallows an error" do Integer("abc", exception: false).should == nil end end end end describe "Integer() given a String", shared: true do it "raises an ArgumentError if the String is a null byte" do -> { Integer("\0") }.should raise_error(ArgumentError) end it "raises an ArgumentError if the String starts with a null byte" do -> { Integer("\01") }.should raise_error(ArgumentError) end it "raises an ArgumentError if the String ends with a null byte" do -> { Integer("1\0") }.should raise_error(ArgumentError) end it "raises an ArgumentError if the String contains a null byte" do -> { Integer("1\01") }.should raise_error(ArgumentError) end it "ignores leading whitespace" do Integer(" 1").should == 1 Integer(" 1").should == 1 Integer("\t\n1").should == 1 end it "ignores trailing whitespace" do Integer("1 ").should == 1 Integer("1 ").should == 1 Integer("1\t\n").should == 1 end it "raises an ArgumentError if there are leading _s" do -> { Integer("_1") }.should raise_error(ArgumentError) -> { Integer("___1") }.should raise_error(ArgumentError) end it "raises an ArgumentError if there are trailing _s" do -> { Integer("1_") }.should raise_error(ArgumentError) -> { Integer("1___") }.should raise_error(ArgumentError) end it "ignores an embedded _" do Integer("1_1").should == 11 end it "raises an ArgumentError if there are multiple embedded _s" do -> { Integer("1__1") }.should raise_error(ArgumentError) -> { Integer("1___1") }.should raise_error(ArgumentError) end it "ignores a single leading +" do Integer("+1").should == 1 end it "raises an ArgumentError if there is a space between the + and number" do -> { Integer("+ 1") }.should raise_error(ArgumentError) end it "raises an ArgumentError if there are multiple leading +s" do -> { Integer("++1") }.should raise_error(ArgumentError) -> { Integer("+++1") }.should raise_error(ArgumentError) end it "raises an ArgumentError if there are trailing +s" do -> { Integer("1+") }.should raise_error(ArgumentError) -> { Integer("1+++") }.should raise_error(ArgumentError) end it "makes the number negative if there's a leading -" do Integer("-1").should == -1 end it "raises an ArgumentError if there are multiple leading -s" do -> { Integer("--1") }.should raise_error(ArgumentError) -> { Integer("---1") }.should raise_error(ArgumentError) end it "raises an ArgumentError if there are trailing -s" do -> { Integer("1-") }.should raise_error(ArgumentError) -> { Integer("1---") }.should raise_error(ArgumentError) end it "raises an ArgumentError if there is a period" do -> { Integer("0.0") }.should raise_error(ArgumentError) end it "raises an ArgumentError for an empty String" do -> { Integer("") }.should raise_error(ArgumentError) end describe "when passed exception: false" do describe "and multiple leading -s" do it "swallows an error" do Integer("---1", exception: false).should == nil end end describe "and multiple trailing -s" do it "swallows an error" do Integer("1---", exception: false).should == nil end end describe "and an argument that contains a period" do it "swallows an error" do Integer("0.0", exception: false).should == nil end end describe "and an empty string" do it "swallows an error" do Integer("", exception: false).should == nil end end end it "parses the value as 0 if the string consists of a single zero character" do Integer("0").should == 0 end %w(x X).each do |x| it "parses the value as a hex number if there's a leading 0#{x}" do Integer("0#{x}1").should == 0x1 Integer("0#{x}dd").should == 0xdd end it "is a positive hex number if there's a leading +0#{x}" do Integer("+0#{x}1").should == 0x1 Integer("+0#{x}dd").should == 0xdd end it "is a negative hex number if there's a leading -0#{x}" do Integer("-0#{x}1").should == -0x1 Integer("-0#{x}dd").should == -0xdd end it "raises an ArgumentError if the number cannot be parsed as hex" do -> { Integer("0#{x}g") }.should raise_error(ArgumentError) end end %w(b B).each do |b| it "parses the value as a binary number if there's a leading 0#{b}" do Integer("0#{b}1").should == 0b1 Integer("0#{b}10").should == 0b10 end it "is a positive binary number if there's a leading +0#{b}" do Integer("+0#{b}1").should == 0b1 Integer("+0#{b}10").should == 0b10 end it "is a negative binary number if there's a leading -0#{b}" do Integer("-0#{b}1").should == -0b1 Integer("-0#{b}10").should == -0b10 end it "raises an ArgumentError if the number cannot be parsed as binary" do -> { Integer("0#{b}2") }.should raise_error(ArgumentError) end end ["o", "O", ""].each do |o| it "parses the value as an octal number if there's a leading 0#{o}" do Integer("0#{o}1").should == 0O1 Integer("0#{o}10").should == 0O10 end it "is a positive octal number if there's a leading +0#{o}" do Integer("+0#{o}1").should == 0O1 Integer("+0#{o}10").should == 0O10 end it "is a negative octal number if there's a leading -0#{o}" do Integer("-0#{o}1").should == -0O1 Integer("-0#{o}10").should == -0O10 end it "raises an ArgumentError if the number cannot be parsed as octal" do -> { Integer("0#{o}9") }.should raise_error(ArgumentError) end end %w(D d).each do |d| it "parses the value as a decimal number if there's a leading 0#{d}" do Integer("0#{d}1").should == 1 Integer("0#{d}10").should == 10 end it "is a positive decimal number if there's a leading +0#{d}" do Integer("+0#{d}1").should == 1 Integer("+0#{d}10").should == 10 end it "is a negative decimal number if there's a leading -0#{d}" do Integer("-0#{d}1").should == -1 Integer("-0#{d}10").should == -10 end it "raises an ArgumentError if the number cannot be parsed as decimal" do -> { Integer("0#{d}a") }.should raise_error(ArgumentError) end end end describe "Integer() given a String and base", shared: true do it "raises an ArgumentError if the String is a null byte" do -> { Integer("\0", 2) }.should raise_error(ArgumentError) end it "raises an ArgumentError if the String starts with a null byte" do -> { Integer("\01", 3) }.should raise_error(ArgumentError) end it "raises an ArgumentError if the String ends with a null byte" do -> { Integer("1\0", 4) }.should raise_error(ArgumentError) end it "raises an ArgumentError if the String contains a null byte" do -> { Integer("1\01", 5) }.should raise_error(ArgumentError) end it "ignores leading whitespace" do Integer(" 16", 16).should == 22 Integer(" 16", 16).should == 22 Integer("\t\n16", 16).should == 22 end it "ignores trailing whitespace" do Integer("16 ", 16).should == 22 Integer("16 ", 16).should == 22 Integer("16\t\n", 16).should == 22 end it "raises an ArgumentError if there are leading _s" do -> { Integer("_1", 7) }.should raise_error(ArgumentError) -> { Integer("___1", 7) }.should raise_error(ArgumentError) end it "raises an ArgumentError if there are trailing _s" do -> { Integer("1_", 12) }.should raise_error(ArgumentError) -> { Integer("1___", 12) }.should raise_error(ArgumentError) end it "ignores an embedded _" do Integer("1_1", 4).should == 5 end it "raises an ArgumentError if there are multiple embedded _s" do -> { Integer("1__1", 4) }.should raise_error(ArgumentError) -> { Integer("1___1", 4) }.should raise_error(ArgumentError) end it "ignores a single leading +" do Integer("+10", 3).should == 3 end it "raises an ArgumentError if there is a space between the + and number" do -> { Integer("+ 1", 3) }.should raise_error(ArgumentError) end it "raises an ArgumentError if there are multiple leading +s" do -> { Integer("++1", 3) }.should raise_error(ArgumentError) -> { Integer("+++1", 3) }.should raise_error(ArgumentError) end it "raises an ArgumentError if there are trailing +s" do -> { Integer("1+", 3) }.should raise_error(ArgumentError) -> { Integer("1+++", 12) }.should raise_error(ArgumentError) end it "makes the number negative if there's a leading -" do Integer("-19", 20).should == -29 end it "raises an ArgumentError if there are multiple leading -s" do -> { Integer("--1", 9) }.should raise_error(ArgumentError) -> { Integer("---1", 9) }.should raise_error(ArgumentError) end it "raises an ArgumentError if there are trailing -s" do -> { Integer("1-", 12) }.should raise_error(ArgumentError) -> { Integer("1---", 12) }.should raise_error(ArgumentError) end it "raises an ArgumentError if there is a period" do -> { Integer("0.0", 3) }.should raise_error(ArgumentError) end it "raises an ArgumentError for an empty String" do -> { Integer("", 12) }.should raise_error(ArgumentError) end it "raises an ArgumentError for a base of 1" do -> { Integer("1", 1) }.should raise_error(ArgumentError) end it "raises an ArgumentError for a base of 37" do -> { Integer("1", 37) }.should raise_error(ArgumentError) end it "accepts wholly lowercase alphabetic strings for bases > 10" do Integer('ab',12).should == 131 Integer('af',20).should == 215 Integer('ghj',30).should == 14929 end it "accepts wholly uppercase alphabetic strings for bases > 10" do Integer('AB',12).should == 131 Integer('AF',20).should == 215 Integer('GHJ',30).should == 14929 end it "accepts mixed-case alphabetic strings for bases > 10" do Integer('Ab',12).should == 131 Integer('aF',20).should == 215 Integer('GhJ',30).should == 14929 end it "accepts alphanumeric strings for bases > 10" do Integer('a3e',19).should == 3681 Integer('12q',31).should == 1049 Integer('c00o',29).should == 292692 end it "raises an ArgumentError for letters invalid in the given base" do -> { Integer('z',19) }.should raise_error(ArgumentError) -> { Integer('c00o',2) }.should raise_error(ArgumentError) end %w(x X).each do |x| it "parses the value as a hex number if there's a leading 0#{x} and a base of 16" do Integer("0#{x}10", 16).should == 16 Integer("0#{x}dd", 16).should == 221 end it "is a positive hex number if there's a leading +0#{x} and base of 16" do Integer("+0#{x}1", 16).should == 0x1 Integer("+0#{x}dd", 16).should == 0xdd end it "is a negative hex number if there's a leading -0#{x} and a base of 16" do Integer("-0#{x}1", 16).should == -0x1 Integer("-0#{x}dd", 16).should == -0xdd end 2.upto(15) do |base| it "raises an ArgumentError if the number begins with 0#{x} and the base is #{base}" do -> { Integer("0#{x}1", base) }.should raise_error(ArgumentError) end end it "raises an ArgumentError if the number cannot be parsed as hex and the base is 16" do -> { Integer("0#{x}g", 16) }.should raise_error(ArgumentError) end end %w(b B).each do |b| it "parses the value as a binary number if there's a leading 0#{b} and the base is 2" do Integer("0#{b}1", 2).should == 0b1 Integer("0#{b}10", 2).should == 0b10 end it "is a positive binary number if there's a leading +0#{b} and a base of 2" do Integer("+0#{b}1", 2).should == 0b1 Integer("+0#{b}10", 2).should == 0b10 end it "is a negative binary number if there's a leading -0#{b} and a base of 2" do Integer("-0#{b}1", 2).should == -0b1 Integer("-0#{b}10", 2).should == -0b10 end it "raises an ArgumentError if the number cannot be parsed as binary and the base is 2" do -> { Integer("0#{b}2", 2) }.should raise_error(ArgumentError) end end ["o", "O"].each do |o| it "parses the value as an octal number if there's a leading 0#{o} and a base of 8" do Integer("0#{o}1", 8).should == 0O1 Integer("0#{o}10", 8).should == 0O10 end it "is a positive octal number if there's a leading +0#{o} and a base of 8" do Integer("+0#{o}1", 8).should == 0O1 Integer("+0#{o}10", 8).should == 0O10 end it "is a negative octal number if there's a leading -0#{o} and a base of 8" do Integer("-0#{o}1", 8).should == -0O1 Integer("-0#{o}10", 8).should == -0O10 end it "raises an ArgumentError if the number cannot be parsed as octal and the base is 8" do -> { Integer("0#{o}9", 8) }.should raise_error(ArgumentError) end 2.upto(7) do |base| it "raises an ArgumentError if the number begins with 0#{o} and the base is #{base}" do -> { Integer("0#{o}1", base) }.should raise_error(ArgumentError) end end end %w(D d).each do |d| it "parses the value as a decimal number if there's a leading 0#{d} and a base of 10" do Integer("0#{d}1", 10).should == 1 Integer("0#{d}10",10).should == 10 end it "is a positive decimal number if there's a leading +0#{d} and a base of 10" do Integer("+0#{d}1", 10).should == 1 Integer("+0#{d}10", 10).should == 10 end it "is a negative decimal number if there's a leading -0#{d} and a base of 10" do Integer("-0#{d}1", 10).should == -1 Integer("-0#{d}10", 10).should == -10 end it "raises an ArgumentError if the number cannot be parsed as decimal and the base is 10" do -> { Integer("0#{d}a", 10) }.should raise_error(ArgumentError) end 2.upto(9) do |base| it "raises an ArgumentError if the number begins with 0#{d} and the base is #{base}" do -> { Integer("0#{d}1", base) }.should raise_error(ArgumentError) end end it "raises an ArgumentError if a base is given for a non-String value" do -> { Integer(98, 15) }.should raise_error(ArgumentError) end end describe "when passed exception: false" do describe "and valid argument" do it "returns an Integer number" do Integer("100", 10, exception: false).should == 100 Integer("100", 2, exception: false).should == 4 end end describe "and invalid argument" do it "swallows an error" do Integer("999", 2, exception: false).should == nil Integer("abc", 10, exception: false).should == nil end end end end describe :kernel_Integer, shared: true do it "raises an ArgumentError when the String contains digits out of range of radix 2" do str = "23456789abcdefghijklmnopqrstuvwxyz" -> { @object.send(@method, str, 2) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 3" do str = "3456789abcdefghijklmnopqrstuvwxyz" -> { @object.send(@method, str, 3) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 4" do str = "456789abcdefghijklmnopqrstuvwxyz" -> { @object.send(@method, str, 4) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 5" do str = "56789abcdefghijklmnopqrstuvwxyz" -> { @object.send(@method, str, 5) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 6" do str = "6789abcdefghijklmnopqrstuvwxyz" -> { @object.send(@method, str, 6) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 7" do str = "789abcdefghijklmnopqrstuvwxyz" -> { @object.send(@method, str, 7) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 8" do str = "89abcdefghijklmnopqrstuvwxyz" -> { @object.send(@method, str, 8) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 9" do str = "9abcdefghijklmnopqrstuvwxyz" -> { @object.send(@method, str, 9) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 10" do str = "abcdefghijklmnopqrstuvwxyz" -> { @object.send(@method, str, 10) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 11" do str = "bcdefghijklmnopqrstuvwxyz" -> { @object.send(@method, str, 11) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 12" do str = "cdefghijklmnopqrstuvwxyz" -> { @object.send(@method, str, 12) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 13" do str = "defghijklmnopqrstuvwxyz" -> { @object.send(@method, str, 13) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 14" do str = "efghijklmnopqrstuvwxyz" -> { @object.send(@method, str, 14) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 15" do str = "fghijklmnopqrstuvwxyz" -> { @object.send(@method, str, 15) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 16" do str = "ghijklmnopqrstuvwxyz" -> { @object.send(@method, str, 16) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 17" do str = "hijklmnopqrstuvwxyz" -> { @object.send(@method, str, 17) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 18" do str = "ijklmnopqrstuvwxyz" -> { @object.send(@method, str, 18) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 19" do str = "jklmnopqrstuvwxyz" -> { @object.send(@method, str, 19) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 20" do str = "klmnopqrstuvwxyz" -> { @object.send(@method, str, 20) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 21" do str = "lmnopqrstuvwxyz" -> { @object.send(@method, str, 21) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 22" do str = "mnopqrstuvwxyz" -> { @object.send(@method, str, 22) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 23" do str = "nopqrstuvwxyz" -> { @object.send(@method, str, 23) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 24" do str = "opqrstuvwxyz" -> { @object.send(@method, str, 24) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 25" do str = "pqrstuvwxyz" -> { @object.send(@method, str, 25) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 26" do str = "qrstuvwxyz" -> { @object.send(@method, str, 26) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 27" do str = "rstuvwxyz" -> { @object.send(@method, str, 27) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 28" do str = "stuvwxyz" -> { @object.send(@method, str, 28) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 29" do str = "tuvwxyz" -> { @object.send(@method, str, 29) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 30" do str = "uvwxyz" -> { @object.send(@method, str, 30) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 31" do str = "vwxyz" -> { @object.send(@method, str, 31) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 32" do str = "wxyz" -> { @object.send(@method, str, 32) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 33" do str = "xyz" -> { @object.send(@method, str, 33) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 34" do str = "yz" -> { @object.send(@method, str, 34) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 35" do str = "z" -> { @object.send(@method, str, 35) }.should raise_error(ArgumentError) end it "raises an ArgumentError when the String contains digits out of range of radix 36" do -> { @object.send(@method, "{", 36) }.should raise_error(ArgumentError) end end describe "Kernel.Integer" do it_behaves_like :kernel_Integer, :Integer_method, KernelSpecs # TODO: fix these specs it_behaves_like :kernel_integer, :Integer, Kernel it_behaves_like "Integer() given a String", :Integer it_behaves_like "Integer() given a String and base", :Integer it "is a public method" do Kernel.Integer(10).should == 10 end end describe "Kernel#Integer" do it_behaves_like :kernel_Integer, :Integer_function, KernelSpecs # TODO: fix these specs it_behaves_like :kernel_integer, :Integer, Object.new it_behaves_like "Integer() given a String", :Integer it_behaves_like "Integer() given a String and base", :Integer it "is a private method" do Kernel.should have_private_instance_method(:Integer) end end