home_run 0.9.0 → 0.9.1

data/spec/date/limits_spec.rb

@@ -0,0 +1,121 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "Date limits: " do
+  before do
+    @d1 = Date.jd(Date::JULIAN - 1)
+    @d2 = Date.jd(Date::GREGORIAN + 1)
+  end
+
+  it "#+ and #- should raise RangeError for dates that are too large or small" do
+    proc{Date.jd(@d1.jd) + 1}.should raise_error(RangeError)
+    proc{Date.jd(@d2.jd) - 1}.should raise_error(RangeError)
+  end
+
+  it "#<< and #>> should raise RangeError for dates that are too large or small" do
+    proc{Date.jd(@d1.jd) >> 1}.should raise_error(RangeError)
+    proc{Date.jd(@d2.jd) << 1}.should raise_error(RangeError)
+  end
+
+  ruby_version_is "1.9" do
+    it "#next_year and #prev_year should raise RangeError for dates that are too large or small" do
+      proc{Date.jd(@d1.jd).next_year}.should raise_error(RangeError)
+      proc{Date.jd(@d2.jd).prev_year}.should raise_error(RangeError)
+    end
+  end
+
+  it ".jd should raise RangeError for dates that are too large or small" do
+    proc{Date.jd(@d1.jd + 1)}.should raise_error(RangeError)
+    proc{Date.jd(@d2.jd - 1)}.should raise_error(RangeError)
+  end
+
+  it ".jd should not raise for dates that are not too large or small" do
+    proc{Date.jd(@d1.jd)}.should_not raise_error
+    proc{Date.jd(@d2.jd)}.should_not raise_error
+  end
+
+  it ".new! should raise RangeError for dates that are too large or small" do
+    proc{Date.new!(@d1.jd + 1)}.should raise_error(RangeError)
+    proc{Date.new!(@d2.jd - 1)}.should raise_error(RangeError)
+  end
+
+  it ".new! should not raise for dates that are not too large or small" do
+    proc{Date.new!(@d1.jd)}.should_not raise_error
+    proc{Date.new!(@d2.jd)}.should_not raise_error
+  end
+
+  it ".civil should raise RangeError for dates that are too large or small" do
+    proc{Date.civil(@d1.year, @d1.month, @d1.day + 1)}.should raise_error(RangeError)
+    proc{Date.civil(@d2.year, @d2.month, @d2.day - 1)}.should raise_error(RangeError)
+  end
+
+  it ".civil should not raise for dates that are not too large or small" do
+    proc{Date.civil(@d1.year, @d1.month, @d1.day)}.should_not raise_error
+    proc{Date.civil(@d2.year, @d2.month, @d2.day)}.should_not raise_error
+  end
+
+  it ".civil should correctly convert dates within limits to JD" do
+    Date.civil(@d1.year, @d1.month, @d1.day).jd.should == @d1.jd
+    Date.civil(@d2.year, @d2.month, @d2.day).jd.should == @d2.jd
+  end
+
+  it ".commercial should raise RangeError for dates that are too large or small" do
+    proc{Date.commercial(@d1.cwyear, @d1.cwday == 6 ? @d1.cweek + 1 : @d1.cweek, @d1.cwday == 6 ? 1 : @d1.cwday + 1)}.should raise_error(RangeError)
+    proc{Date.commercial(@d2.cwyear, @d2.cwday == 1 ? @d2.cweek - 1 : @d2.cweek, @d2.cwday == 1 ? 7 : @d2.cwday - 1)}.should raise_error(RangeError)
+  end
+
+  it ".commercial should not raise for dates that are not too large or small" do
+    proc{Date.commercial(@d1.cwyear, @d1.cweek, @d1.cwday)}.should_not raise_error
+    proc{Date.commercial(@d2.cwyear, @d2.cweek, @d2.cwday)}.should_not raise_error
+  end
+
+  it ".commercial should correctly convert dates within limits to JD" do
+    Date.commercial(@d1.cwyear, @d1.cweek, @d1.cwday).jd.should == @d1.jd
+    Date.commercial(@d2.cwyear, @d2.cweek, @d2.cwday).jd.should == @d2.jd
+  end
+
+  it ".ordinal should raise RangeError for dates that are too large or small" do
+    proc{Date.ordinal(@d1.year, @d1.yday + 1)}.should raise_error(RangeError)
+    proc{Date.ordinal(@d2.year, @d2.yday - 1)}.should raise_error(RangeError)
+  end
+
+  it ".ordinal should not raise for dates that are not too large or small" do
+    proc{Date.ordinal(@d1.year, @d1.yday)}.should_not raise_error
+    proc{Date.ordinal(@d2.year, @d2.yday)}.should_not raise_error
+  end
+
+  it ".ordinal should correctly convert dates within limits to JD" do
+    Date.ordinal(@d1.year, @d1.yday).jd.should == @d1.jd
+    Date.ordinal(@d2.year, @d2.yday).jd.should == @d2.jd
+  end
+
+  it ".parse should raise RangeError for civil dates that are too large or small" do
+    proc{Date.parse("#{@d1.year}-#{@d1.month}-#{@d1.day+1}")}.should raise_error(RangeError)
+    proc{Date.parse("#{@d2.year}-#{@d2.month}-#{@d2.day-1}")}.should raise_error(RangeError)
+  end
+
+  it ".parse should not raise for civil dates that are not too large or small" do
+    proc{Date.parse("#{@d1.year}-#{@d1.month}-#{@d1.day}")}.should_not raise_error
+    proc{Date.parse("#{@d2.year}-#{@d2.month}-#{@d2.day}")}.should_not raise_error
+  end
+
+  it ".parse should correctly convert civil dates within limits to JD" do
+    Date.parse("#{@d1.year}-#{@d1.month}-#{@d1.day}").jd.should == @d1.jd
+    Date.parse("#{@d2.year}-#{@d2.month}-#{@d2.day}").jd.should == @d2.jd
+  end
+
+  it ".strptime should raise RangeError for civil dates that are too large or small" do
+    proc{Date.strptime("#{@d1.year}-#{@d1.month}-#{@d1.day+1}", "%Y-%m-%d")}.should raise_error(RangeError)
+    proc{Date.strptime("#{@d2.year}-#{@d2.month}-#{@d2.day-1}", "%Y-%m-%d")}.should raise_error(RangeError)
+  end
+
+  it ".strptime should not raise for civil dates that are not too large or small" do
+    proc{Date.strptime("#{@d1.year}-#{@d1.month}-#{@d1.day}", "%Y-%m-%d")}.should_not raise_error
+    proc{Date.strptime("#{@d2.year}-#{@d2.month}-#{@d2.day}", "%Y-%m-%d")}.should_not raise_error
+  end
+
+  it ".strptime should correctly convert civil dates within limits to JD" do
+    Date.strptime("#{@d1.year}-#{@d1.month}-#{@d1.day}", "%Y-%m-%d").jd.should == @d1.jd
+    Date.strptime("#{@d2.year}-#{@d2.month}-#{@d2.day}", "%Y-%m-%d").jd.should == @d2.jd
+  end
+
+end

data/spec/date/parse_spec.rb

@@ -11,11 +11,16 @@ ruby_version_is "" ... "1.9" do
       Date.zone_to_diff('+08:00').should == 28800
       Date.zone_to_diff('+08:30').should == 30600
       Date.zone_to_diff('+08:30:04').should == 30604
+      Date.zone_to_diff('-08:00').should == -28800
+      Date.zone_to_diff('-08:30').should == -30600
+      Date.zone_to_diff('-08:30:04').should == -30604
     end
 
     it "should return the offset for the given numeric time zone with . or ," do
       Date.zone_to_diff('+08,30').should == 29880
       Date.zone_to_diff('+08.30').should == 29880
+      Date.zone_to_diff('-08,30').should == -29880
+      Date.zone_to_diff('-08.30').should == -29880
     end
 
     it "should return the offset for the given numeric time with all digits" do
@@ -73,7 +78,67 @@ describe "Date.parse" do
     d.should == Date.civil(Date.today.year, Date.today.month, 5)
   end
   
+  it "can handle BC/BCE in the string as being a negative year" do
+    Date.parse("BC 2012-11-10").should == Date.civil(-2011, 11, 10)
+    Date.parse("2012-11-10 BCE").should == Date.civil(-2011, 11, 10)
+  end
+
+  it "can handle a leftover DD string as a day if time has been parsed" do
+    Date.parse("'09 10:20:30 13").should == Date.civil(2009, 1, 13)
+  end
+
+  it "can handle 'DD as a year" do
+    Date.parse("'12").should == Date.civil(2012, 1, 1)
+  end
+
+  it "can handle JIS X 301 format" do
+    Date.parse("H22.01.06").should == Date.civil(2010, 1, 6)
+  end
+
+  it "can handle DDDD-MMM-DD VMS format" do
+    Date.parse("2012-jan-06").should == Date.civil(2012, 1, 6)
+  end
+
+  it "can handle MMM-DDDD-DD VMS format" do
+    Date.parse("jan-2012-06").should == Date.civil(2012, 1, 6)
+  end
+
+  # Less common ISO formats
+
+  it "can handle DDDD-wDD-D as a commercial week date" do
+    Date.parse("2011-w12-6").should == Date.commercial(2011, 12, 6)
+  end
+
+  it "can handle DD-wDD-D as a commercial week date" do
+    Date.parse("11-w12-6").should == Date.commercial(2011, 12, 6)
+  end
+
+  it "can handle -wDD-D as a commercial week date in the current year" do
+    Date.parse("-w12-6").should == Date.commercial(Time.now.year, 12, 6)
+  end
+
+  it "can handle -w-D as a commercial week date in the current year" do
+    Date.parse("-w-6").should == Date.commercial(Time.now.year, 1, 6)
+  end
+
+  it "can handle ---DD as a day in the current month" do
+    Date.parse("---06").should == Date.civil(Time.now.year, Time.now.month, 6)
+  end
+
+  it "can handle --DDDD as a month and day in the current year" do
+    Date.parse("--1206").should == Date.civil(Time.now.year, 12, 6)
+  end
+
+  it "can handle DDDD-DDD as an ordinal date" do
+    Date.parse("2012-106").should == Date.ordinal(2012, 106)
+  end
+
+  it "can handle -DDD as an ordinal day in the current year" do
+    Date.parse("blah-106").should == Date.ordinal(Time.now.year, 106)
+  end
+
   # Specs using numbers
+
   it "can't handle a single digit" do
     lambda{ Date.parse("1") }.should raise_error(ArgumentError)
   end
@@ -283,6 +348,14 @@ describe "Date#parse with ' ' separator" do
   end
 
   it_should_behave_like "date_parse"
+
+  it "can parse a 'DD mmm BC YYYY' string into a Date object" do
+    d = Date.parse("23 feb BC 2008")
+    d.year.should  == -2007
+    d.month.should == 2
+    d.day.should   == 23
+  end
+
 end
 
 describe "Date#parse with '/' separator US-style" do
@@ -438,5 +511,86 @@ describe "Date::Format::STYLE" do
     d.month.should == 1
     d.day.should   == 10
   end
+
+  it "Can parse DD/DD/'DD with all three types" do
+    Date::Format::STYLE[:slash] = :ymd
+    Date.parse("12/11/'10").should == Date.civil(2010, 11, 12)
+    Date::Format::STYLE[:slash] = :dmy
+    Date.parse("12/11/'10").should == Date.civil(2010, 11, 12)
+    Date::Format::STYLE[:slash] = :mdy
+    Date.parse("12/11/'10").should == Date.civil(2010, 12, 11)
+  end
+
+  it "Can parse 'DD/DD/DD with all three types" do
+    Date::Format::STYLE[:slash] = :ymd
+    Date.parse("'12/11/10").should == Date.civil(2012, 11, 10)
+    Date::Format::STYLE[:slash] = :dmy
+    Date.parse("'12/11/10").should == Date.civil(2012, 11, 10)
+    Date::Format::STYLE[:slash] = :mdy
+    Date.parse("'12/11/10").should == Date.civil(2012, 11, 10)
+  end
+
+  it "Can parse DD/'DD/DD with all three types" do
+    Date::Format::STYLE[:slash] = :ymd
+    Date.parse("12/'11/10").should == Date.civil(2011, 10, 12)
+    Date::Format::STYLE[:slash] = :dmy
+    Date.parse("12/'11/10").should == Date.civil(2011, 12, 10)
+    Date::Format::STYLE[:slash] = :mdy
+    Date.parse("12/'11/10").should == Date.civil(2011, 12, 10)
+  end
+
+  it "Can parse DD/'DD with all three types" do
+    Date::Format::STYLE[:slash] = :ymd
+    Date.parse("12/'11").should == Date.civil(2011, 12, 1)
+    Date::Format::STYLE[:slash] = :dmy
+    Date.parse("12/'11").should == Date.civil(2011, 12, 1)
+    Date::Format::STYLE[:slash] = :mdy
+    Date.parse("12/'11").should == Date.civil(2011, 12, 1)
+  end
+
+  it "Can parse 'DD/DD with all three types" do
+    Date::Format::STYLE[:slash] = :ymd
+    Date.parse("'12/11").should == Date.civil(2012, 11, 1)
+    Date::Format::STYLE[:slash] = :dmy
+    Date.parse("'12/11").should == Date.civil(2012, 11, 1)
+    Date::Format::STYLE[:slash] = :mdy
+    Date.parse("'12/11").should == Date.civil(2012, 11, 1)
+  end
+
+  it "Can parse 'D/DD with all three types" do
+    Date::Format::STYLE[:slash] = :ymd
+    Date.parse("'2/11").should == Date.civil(2002, 11, 1)
+    Date::Format::STYLE[:slash] = :dmy
+    Date.parse("'2/11").should == Date.civil(2002, 11, 1)
+    Date::Format::STYLE[:slash] = :mdy
+    Date.parse("'2/11").should == Date.civil(2002, 11, 1)
+  end
+
+  it "Can parse DD/DD with all three types" do
+    Date::Format::STYLE[:slash] = :ymd
+    Date.parse("12/11").should == Date.civil(Time.now.year, 12, 11)
+    Date::Format::STYLE[:slash] = :dmy
+    Date.parse("12/11").should == Date.civil(Time.now.year, 11, 12)
+    Date::Format::STYLE[:slash] = :mdy
+    Date.parse("12/11").should == Date.civil(Time.now.year, 12, 11)
+  end
+
+  it "Can parse DDDD/DD as year/month with all three types" do
+    Date::Format::STYLE[:slash] = :ymd
+    Date.parse("2012/11").should == Date.civil(2012, 11, 1)
+    Date::Format::STYLE[:slash] = :dmy
+    Date.parse("2012/11").should == Date.civil(2012, 11, 1)
+    Date::Format::STYLE[:slash] = :mdy
+    Date.parse("2012/11").should == Date.civil(2012, 11, 1)
+  end
+
+  it "Can parse DD/DDDD as month/year with all three types" do
+    Date::Format::STYLE[:slash] = :ymd
+    Date.parse("11/2012").should == Date.civil(2012, 11, 1)
+    Date::Format::STYLE[:slash] = :dmy
+    Date.parse("11/2012").should == Date.civil(2012, 11, 1)
+    Date::Format::STYLE[:slash] = :mdy
+    Date.parse("11/2012").should == Date.civil(2012, 11, 1)
+  end
 end
 

data/spec/date/parsing_spec.rb

@@ -5,10 +5,15 @@ ruby_version_is "1.9" do
     it "._httpdate should parse an HTTP format" do
       Date._httpdate("Fri, 02 Jan 2009 00:00:00 GMT").should ==
         {:year=>2009, :mon=>1, :mday=>2, :wday=>5, :hour=>0, :min=>0, :sec=>0, :offset=>0, :zone=>'GMT'}
+      Date._httpdate("Friday, 02-Jan-09 00:00:00 GMT").should ==
+        {:year=>2009, :mon=>1, :mday=>2, :wday=>5, :hour=>0, :min=>0, :sec=>0, :offset=>0, :zone=>'GMT'}
+      Date._httpdate("Fri Jan 2 00:00:00 2009").should == 
+        {:year=>2009, :mon=>1, :mday=>2, :wday=>5, :hour=>0, :min=>0, :sec=>0}
     end
 
     it "._iso8601 should parse an ISO8601 format" do
       Date._iso8601("2009-01-02").should == {:year=>2009, :mon=>1, :mday=>2}
+      Date._iso8601("--1002").should == {:mon=>10, :mday=>2}
     end
 
     it "._jisx03010 should parse an JIS X 0301 format" do
@@ -19,11 +24,17 @@ ruby_version_is "1.9" do
       Date._jisx0301("M06.01.02").should == {:year=>1873, :mon=>1, :mday=>2}
       Date._jisx0301("1872-01-02").should == {:year=>1872, :mon=>1, :mday=>2}
       Date._jisx0301("1867-01-02").should == {:year=>1867, :mon=>1, :mday=>2}
+
+      Date._jisx0301("21.01.02").should == {:year=>2009, :mon=>1, :mday=>2}
     end
 
     it "._rfc2822 should parse an RFC2822 format" do
       Date._rfc2822("Fri, 2 Jan 2009 00:00:00 +0000").should == 
         {:year=>2009, :mon=>1, :mday=>2, :wday=>5, :hour=>0, :min=>0, :sec=>0, :offset=>0, :zone=>'+0000'}
+      Date._rfc2822("Fri, 2 Jan 09 00:00:00 +0000").should == 
+        {:year=>2009, :mon=>1, :mday=>2, :wday=>5, :hour=>0, :min=>0, :sec=>0, :offset=>0, :zone=>'+0000'}
+      Date._rfc2822("Fri, 2 Jan 109 00:00:00 +0000").should == 
+        {:year=>2009, :mon=>1, :mday=>2, :wday=>5, :hour=>0, :min=>0, :sec=>0, :offset=>0, :zone=>'+0000'}
     end
 
     it "._rfc822 should parse an RFC822 format" do

data/spec/date/step_spec.rb

@@ -2,6 +2,28 @@ require File.expand_path('../../spec_helper', __FILE__)
 
 describe "Date#step" do
   
+  ruby_version_is "" ... "1.9" do
+    it "should require a block" do
+      proc{Date.today.step(Date.today)}.should raise_error(LocalJumpError)
+    end
+  end
+
+  ruby_version_is "1.9" do
+    it "should return an enumerator without a block" do
+      ds    = Date.civil(2008, 10, 11)
+      de    = Date.civil(2008,  9, 29)
+      e = de.step(ds)
+      e.should be_kind_of(Enumerator)
+      count = 0
+      e.each do |d|
+        d.should <= ds
+        d.should >= de
+        count += 1
+      end.should == de
+      count.should == 13
+    end
+  end
+
   it "should be able to step forward in time" do
     ds    = Date.civil(2008, 10, 11)
     de    = Date.civil(2008,  9, 29)

data/spec/date/strptime_spec.rb

@@ -84,9 +84,15 @@ describe "Date#strptime" do
     Date.strptime(" 6", "%e").should == Date.civil(d.year, d.month, 6)
   end
 
-  it "parses a commercial year with leading zeroes" do
+  it "parses a commercial year" do
     Date.strptime("2000", "%G").should == Date.civil(2000,  1,  3)
     Date.strptime("2002", "%G").should == Date.civil(2001, 12, 31)
+    Date.strptime("20000", "%G").should == Date.civil(20000,  1,  3)
+  end
+
+  it "parses a commercial year with trailing numbers" do
+    Date.strptime("20000", "%G0").should == Date.civil(2000,  1,  3)
+    Date.strptime("20023", "%G%u").should == Date.civil(2002, 1, 2)
   end
 
   it "parses a commercial year with only two digits" do
@@ -152,8 +158,15 @@ describe "Date#strptime" do
     Date.strptime("2007 4", "%Y %w").should == Date.civil(2007, 1, 4)
   end
 
-  it "parses a year in YYYY format" do
+  it "parses a full year " do
     Date.strptime("2007", "%Y").should == Date.civil(2007, 1, 1)
+    Date.strptime("200", "%Y").should == Date.civil(200, 1, 1)
+    Date.strptime("20000", "%Y").should == Date.civil(20000, 1, 1)
+  end
+
+  it "parses a full year with trailing numbers" do
+    Date.strptime("20000", "%Y0").should == Date.civil(2000, 1, 1)
+    Date.strptime("200002", "%Y%m").should == Date.civil(2000, 2, 1)
   end
 
   it "parses a year in YY format" do
@@ -164,6 +177,11 @@ describe "Date#strptime" do
     Date.strptime("00 % \n \t %1", "%y %% %n %t %%1").should == Date.civil(2000, 1, 1)
   end
 
+  it "parse a %Y%m%d date" do
+    Date.strptime("20000203", "%Y%m%d").should == Date.civil(2000, 2, 3)
+  end
+  
+
   ############################
   # Specs that combine stuff #
   ############################
@@ -173,6 +191,11 @@ describe "Date#strptime" do
     Date.strptime("Thu Apr  6 00:00:00 2000", "%a %b %e %H:%M:%S %Y").should == Date.civil(2000, 4, 6)
   end
 
+  it "parses a full date with trailing digits" do
+    Date.strptime("Thu Apr  6 00:00:00 20000", "%c0").should == Date.civil(2000, 4, 6)
+    Date.strptime("Thu Apr  6 00:00:00 200012", "%c%m").should == Date.civil(2000, 12, 6)
+  end
+
   it "parses a date with slashes" do
     Date.strptime("04/06/00", "%D").should == Date.civil(2000, 4, 6)
     Date.strptime("04/06/00", "%m/%d/%y").should == Date.civil(2000, 4, 6)
@@ -183,11 +206,16 @@ describe "Date#strptime" do
     Date.strptime("2000-04-06", "%Y-%m-%d").should == Date.civil(2000, 4, 6)
   end
 
-  it "parses a commercial week" do
+  it "parses a civil format with month name" do
     Date.strptime(" 9-Apr-2000", "%v").should == Date.civil(2000, 4, 9)
     Date.strptime(" 9-Apr-2000", "%e-%b-%Y").should == Date.civil(2000, 4, 9)
   end
   
+  it "parses a civil format with month name with trailing digits" do
+    Date.strptime(" 9-Apr-20000", "%v0").should == Date.civil(2000, 4, 9)
+    Date.strptime(" 9-Apr-200012", "%v%m").should == Date.civil(2000, 12, 9)
+  end
+  
   it "parses a date given MM/DD/YY" do
     Date.strptime("04/06/00", "%x").should == Date.civil(2000, 4, 6)
     Date.strptime("04/06/00", "%m/%d/%y").should == Date.civil(2000, 4, 6)
@@ -198,4 +226,8 @@ describe "Date#strptime" do
     Date.strptime("Sun Apr  9 00:00:00 +00:00 2000", "%a %b %e %H:%M:%S %Z %Y").should == Date.civil(2000, 4, 9)
   end
 
+  it "parses a date given in full notation with trailing digits" do
+    Date.strptime("Sun Apr  9 00:00:00 +00:00 20000", "%+0").should == Date.civil(2000, 4, 9)
+    Date.strptime("Sun Apr  9 00:00:00 +00:00 200012", "%+%m").should == Date.civil(2000, 12, 9)
+  end
 end

data/spec/datetime/add_spec.rb

@@ -27,10 +27,10 @@ describe "DateTime#+" do
   end
 
   it "should raise an error on non numeric parameters" do
-    lambda { DateTime.civil(2007,2,27) + :hello }.should raise_error(TypeError)
-    lambda { DateTime.civil(2007,2,27) + "hello" }.should raise_error(TypeError)
-    lambda { DateTime.civil(2007,2,27) + DateTime.new(2007,2,27) }.should raise_error(TypeError)
-    lambda { DateTime.civil(2007,2,27) + Object.new }.should raise_error(TypeError)
+    lambda { DateTime.civil(2007,2,27) + :hello }.should raise_error
+    lambda { DateTime.civil(2007,2,27) + "hello" }.should raise_error
+    lambda { DateTime.civil(2007,2,27) + DateTime.new(2007,2,27) }.should raise_error
+    lambda { DateTime.civil(2007,2,27) + Object.new }.should raise_error
   end
   
 end

data/spec/datetime/allocate_spec.rb

@@ -0,0 +1,7 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+describe "Date.allocate" do
+  it "should not be defined" do
+    proc{DateTime.allocate}.should raise_error
+  end
+end

data/spec/datetime/encoding_spec.rb

@@ -0,0 +1,42 @@
+require File.expand_path('../../spec_helper', __FILE__)
+
+ruby_version_is "1.9" do
+  describe "DateTime string encoding methods" do
+    it "should return strings in US-ASCII encoding by default" do
+      d = DateTime.now
+      d.asctime.encoding.name.should == 'US-ASCII'
+      d.ctime.encoding.name.should == 'US-ASCII'
+      d.httpdate.encoding.name.should == 'US-ASCII'
+      d.inspect.encoding.name.should == 'US-ASCII'
+      d.iso8601.encoding.name.should == 'US-ASCII'
+      d.jisx0301.encoding.name.should == 'US-ASCII'
+      d.rfc2822.encoding.name.should == 'US-ASCII'
+      d.rfc3339.encoding.name.should == 'US-ASCII'
+      d.rfc822.encoding.name.should == 'US-ASCII'
+      d.strftime('%S:%M:%H').encoding.name.should == 'US-ASCII'
+      d.to_s.encoding.name.should == 'US-ASCII'
+      d.xmlschema.encoding.name.should == 'US-ASCII'
+    end
+
+    it "should return strings in default_internal encoding if set" do
+      begin
+        Encoding.default_internal = 'UTF-8'
+        d = DateTime.now
+        d.asctime.encoding.name.should == 'UTF-8'
+        d.ctime.encoding.name.should == 'UTF-8'
+        d.httpdate.encoding.name.should == 'UTF-8'
+        d.inspect.encoding.name.should == 'UTF-8'
+        d.iso8601.encoding.name.should == 'UTF-8'
+        d.jisx0301.encoding.name.should == 'UTF-8'
+        d.rfc2822.encoding.name.should == 'UTF-8'
+        d.rfc3339.encoding.name.should == 'UTF-8'
+        d.rfc822.encoding.name.should == 'UTF-8'
+        d.strftime('%S:%M:%H').encoding.name.should == 'UTF-8'
+        d.to_s.encoding.name.should == 'UTF-8'
+        d.xmlschema.encoding.name.should == 'UTF-8'
+      ensure
+        Encoding.default_internal = nil
+      end
+    end
+  end
+end