Skip to content

libraries/time: parseTime barfs on leading space in format string

This used to work around 1.4.0, one of my test suites caught it:

module Main
where

import Data.Time.Clock
import Data.Time.Format
import System.Locale

main :: IO ()
main = do
  putStrLn "Trailing space is handled:"
  print $ (parseTime defaultTimeLocale "%M " "15 " :: Maybe UTCTime)

  putStrLn "\nBut leading space isn't:"
  print $ (parseTime defaultTimeLocale " %M" " 15" :: Maybe UTCTime)
Trac metadata
Trac field Value
Version 7.8.2
Type Bug
TypeOfFailure OtherFailure
Priority normal
Resolution Unresolved
Component libraries (other)
Test case
Differential revisions
BlockedBy
Related
Blocking
CC
Operating system
Architecture
To upload designs, you'll need to enable LFS and have an admin enable hashed storage. More information