File tree Expand file tree Collapse file tree 1 file changed +0
-9
lines changed Expand file tree Collapse file tree 1 file changed +0
-9
lines changed Original file line number Diff line number Diff line change 5
5
6
6
module Database.PostgreSQL.TransactionalStore
7
7
( PGTransaction
8
- , TransactionalStore (.. )
9
8
, runPGTransaction
10
9
, runPGTransaction'
11
10
, query
@@ -46,14 +45,6 @@ runPGTransaction' isolation (PGTransaction pgTrans) conn =
46
45
runPGTransaction :: MonadIO m => PGTransaction a -> Postgres. Connection -> m a
47
46
runPGTransaction = runPGTransaction' Postgres.Transaction. DefaultIsolationLevel
48
47
49
- -- | Used to execute a `HeliumStore' `m' value inside of a transaction, with
50
- -- connection/state `a', with effects in `n'.
51
- class TransactionalStore a m n where
52
- runTransaction :: m b -> a -> n b
53
-
54
- instance MonadIO m => TransactionalStore Postgres. Connection PGTransaction m where
55
- runTransaction = runPGTransaction
56
-
57
48
-- | Issue an SQL query, taking a 'ToRow' input and yielding 'FromRow' outputs.
58
49
query :: (ToRow input , FromRow output )
59
50
=> Postgres. Query
You can’t perform that action at this time.
0 commit comments