foundation 0.0.27 → 0.0.28

raw patch · 2 files changed

+11/−13 lines, 2 filesdep ~basementPVP ok

version bump matches the API change (PVP)

Dependency ranges changed: basement

API changes (from Hackage documentation)

Files

• Foundation/Time/StopWatch.hs +6/−4
• foundation.cabal +5/−9

@@ -69,8 +69,11 @@ startPrecise = do #if defined(mingw32_HOST_OS)     blk <- newPinned 16-    _ <- withMutablePtr blk $ \p ->-        c_QueryPerformanceCounter (castPtr p `ptrPlus` 8)+    _ <- withMutablePtr blk $ \p -> do+          ticks <- integralDownsize <$> queryPerformanceCounter :: IO Word64+          let p64 = castPtr p :: Ptr Word64+          poke (p64 `ptrPlus` 8) ticks+          pure p     pure (StopWatchPrecise blk) #elif defined(darwin_HOST_OS)     StopWatchPrecise <$> sysMacos_absolute_time@@ -86,9 +89,8 @@ stopPrecise (StopWatchPrecise blk) = do #if defined(mingw32_HOST_OS)     withMutablePtr blk $ \p -> do-        _ <- c_QueryPerformanceCounter (castPtr p)+        end <- integralDownsize <$> queryPerformanceCounter         let p64 = castPtr p :: Ptr Word64-        end   <- peek p64         start <- peek (p64 `ptrPlus` 8)         pure $ NanoSeconds ((end - start) * secondInNano `div` initPrecise) #elif defined(darwin_HOST_OS)

@@ -1,5 +1,5 @@ name:                foundation-version:             0.0.27+version:             0.0.28 synopsis:            Alternative prelude with batteries and no dependencies description:     A custom prelude with no dependencies apart from base.@@ -196,7 +196,7 @@                       BangPatterns                       DeriveDataTypeable -  if impl(ghc < 8.0) || impl(ghcjs)+  if impl(ghc < 8.8) || impl(ghcjs)     buildable: False   else     build-depends:   base@@ -206,7 +206,7 @@       if arch(i386)         extra-libraries: gcc -  build-depends: basement == 0.0.13+  build-depends: basement == 0.0.14    -- FIXME add suport for armel mipsel   --  CPP-options: -DARCH_IS_LITTLE_ENDIAN@@ -216,10 +216,8 @@     cpp-options: -DARCH_IS_LITTLE_ENDIAN   else     cpp-options: -DARCH_IS_UNKNOWN_ENDIAN-  ghc-options:       -Wall -fwarn-tabs+  ghc-options:       -Wall -fwarn-tabs -Wno-redundant-constraints   default-language:  Haskell2010-  if impl(ghc >= 8.0)-    ghc-options:     -Wno-redundant-constraints   if flag(bounds-check)     cpp-options: -DFOUNDATION_BOUNDS_CHECK @@ -251,10 +249,8 @@   build-depends:     base > 0 && < 1000                    , basement                    , foundation-  ghc-options:       -Wall -fno-warn-orphans -fno-warn-missing-signatures+  ghc-options:       -Wall -fno-warn-orphans -fno-warn-missing-signatures -Wno-redundant-constraints   default-language:  Haskell2010-  if impl(ghc >= 8.0)-    ghc-options:     -Wno-redundant-constraints  test-suite foundation-link   type:              exitcode-stdio-1.0