beam-large-records 0.1.3 → 0.1.4
raw patch · 3 files changed
+17/−10 lines, 3 filesdep ~basedep ~beam-coredep ~beam-sqlitePVP ok
version bump matches the API change (PVP)
Dependency ranges changed: base, beam-core, beam-sqlite, microlens
API changes (from Hackage documentation)
Files
- CHANGELOG.md +5/−0
- beam-large-records.cabal +8/−6
- test/Test/Record/Beam/Tutorial3.hs +4/−4
CHANGELOG.md view
@@ -1,5 +1,10 @@ # Revision history for beam-large-records +## 0.1.4 -- 2026-05-20++* Use beam-core-0.11+* Support ghc 9.14+ ## 0.1.3 -- 2025-09-19 * Support for ghc 9.10 and 9.12
beam-large-records.cabal view
@@ -1,6 +1,6 @@ cabal-version: 2.4 name: beam-large-records-version: 0.1.3+version: 0.1.4 synopsis: Integration of large-records with beam-core. description: This package provides the necessary instances that make it possible to use records defined with large-records as@@ -19,6 +19,7 @@ GHC ==9.8.4 GHC ==9.10.2 GHC ==9.12.2+ GHC ==9.14.1 source-repository head type: git@@ -38,12 +39,13 @@ Data.Record.Beam.ZipDatabase Data.Record.Beam.ZipTables build-depends:+ base >= 4.14 && < 4.24+ , large-generics >= 0.2 && < 0.3+ , microlens >= 0.4 && < 0.6+ -- lower bound on beam-core is necessary -- see https://github.com/haskell-beam/beam/issues/585- base >= 4.14 && < 4.23- , beam-core >= 0.10.3.0 && < 0.11- , large-generics >= 0.2 && < 0.3- , microlens >= 0.4 && < 0.5+ , beam-core >= 0.11 && < 0.12 hs-source-dirs: src default-language:@@ -81,7 +83,7 @@ base , beam-core , beam-large-records- , beam-sqlite+ , beam-sqlite >=0.7 && <0.8 , large-records , record-hasfield , sqlite-simple
test/Test/Record/Beam/Tutorial3.hs view
@@ -259,12 +259,12 @@ insertValues users [jamesAddress1, bettyAddress1, bettyAddress2] <-- runInsertReturningList $+ runSqliteInsertReturningList $ insertReturning (shoppingCart3Db ^. #shoppingCart3UserAddresses) $ insertExpressions addresses [redBall, mathTextbook, introToHaskell, suitcase] <-- runInsertReturningList $+ runSqliteInsertReturningList $ insertReturning (shoppingCart3Db ^. #shoppingCart3Products) $ insertExpressions products @@ -276,7 +276,7 @@ -- Marshalling custom types bettyShippingInfo <- do [bettyShippingInfo] <-- runInsertReturningList $+ runSqliteInsertReturningList $ insertReturning (shoppingCart3Db ^. #shoppingCart3ShippingInfos) $ insertExpressions [ ShippingInfo default_ (val_ USPS) (val_ "12345790ABCDEFGHI")@@ -287,7 +287,7 @@ -- Timestamps now <- liftIO $ zonedTimeToLocalTime <$> getZonedTime [jamesOrder1, bettyOrder1, jamesOrder2] <-- runInsertReturningList $+ runSqliteInsertReturningList $ insertReturning (shoppingCart3Db ^. #shoppingCart3Orders) $ insertExpressions [ Order default_ currentTimestamp_ (val_ (pk james)) (val_ (pk jamesAddress1)) nothing_