bring back OsPath changes
I hope that the windows test suite failure on appveyor was fixed by updating to a newer windows there. I have not been able to reproduce that failure in a windows 11 VM run locally.
This commit is contained in:
parent
f0ab439c95
commit
84291b6014
119 changed files with 1003 additions and 647 deletions
|
@ -19,7 +19,6 @@ import Data.Time
|
|||
import Data.Ratio
|
||||
import Control.Applicative
|
||||
import qualified Data.ByteString as B
|
||||
import qualified Data.ByteString.Char8 as B8
|
||||
import qualified Data.Attoparsec.ByteString as A
|
||||
import Data.Attoparsec.ByteString.Char8 (char, decimal, signed, isDigit_w8)
|
||||
|
||||
|
@ -41,9 +40,9 @@ parserPOSIXTime = mkPOSIXTime
|
|||
A.parseOnly (decimal <* A.endOfInput) b
|
||||
return (d, len)
|
||||
|
||||
parsePOSIXTime :: String -> Maybe POSIXTime
|
||||
parsePOSIXTime s = eitherToMaybe $
|
||||
A.parseOnly (parserPOSIXTime <* A.endOfInput) (B8.pack s)
|
||||
parsePOSIXTime :: B.ByteString -> Maybe POSIXTime
|
||||
parsePOSIXTime b = eitherToMaybe $
|
||||
A.parseOnly (parserPOSIXTime <* A.endOfInput) b
|
||||
|
||||
{- This implementation allows for higher precision in a POSIXTime than
|
||||
- supported by the system's Double, and avoids the complications of
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue