[commit: packages/time] master: Moved %c to failing ZonedTime test since formatTime %Z does not output time zone offset if there is no time zone name. (bef9a3c)

git at git.haskell.org git at git.haskell.org
Sun Dec 20 07:50:23 UTC 2015


Repository : ssh://git@git.haskell.org/time

On branch  : master
Link       : http://git.haskell.org/packages/time.git/commitdiff/bef9a3cf6f39980706483a8e14013890a9c54d80

>---------------------------------------------------------------

commit bef9a3cf6f39980706483a8e14013890a9c54d80
Author: bjorn <bjorn at bringert.net>
Date:   Thu Nov 16 03:12:47 2006 -0800

    Moved %c to failing ZonedTime test since formatTime %Z does not output time zone offset if there is no time zone name.
    
    darcs-hash:20061116111247-6cdb2-509d4a19b5225b95dc0343a983099569d2f90fad


>---------------------------------------------------------------

bef9a3cf6f39980706483a8e14013890a9c54d80
 time/test/TestParseTime.hs | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/time/test/TestParseTime.hs b/time/test/TestParseTime.hs
index 356f2fb..91d76b0 100644
--- a/time/test/TestParseTime.hs
+++ b/time/test/TestParseTime.hs
@@ -237,7 +237,7 @@ timeZoneFormats = map FormatString ["%z","%z%Z","%Z%z"]
 
 zonedTimeFormats :: [FormatString ZonedTime]
 zonedTimeFormats = map FormatString
-  ["%a, %d %b %Y %H:%M:%S %z","%c"]
+  ["%a, %d %b %Y %H:%M:%S %z"]
 
 utcTimeFormats :: [FormatString UTCTime]
 utcTimeFormats = map FormatString 
@@ -275,7 +275,8 @@ failingTimeZoneFormats = map FormatString
 failingZonedTimeFormats :: [FormatString ZonedTime]
 failingZonedTimeFormats = map FormatString 
     [
-     -- %Z is not implemented properly
+     -- can't figure out offset from %Z, also, formatTime produces "" for %Z
+     "%c",
      "%a, %d %b %Y %H:%M:%S %Z",
      -- %s does not include second decimals
      "%s %z"



More information about the ghc-commits mailing list