git.iko.soy/project-m36
on master help sign in
properly export functions needed in ProjectM36.Client test
78d08ceAgentM
ProjectM36/Client.hs+25−1
compare with master
unifiedsplit
@@ -1,5 +1,28 @@
1{-# LANGUAGE OverloadedStrings #-}
1{-# LANGUAGE OverloadedStrings #-}
2−module ProjectM36.Client where
2+module ProjectM36.Client
3+ (ConnectionInfo(..),
4+ Connection,
5+ Port,
6+ Hostname,
7+ DatabaseName,
8+ ConnectionError,
9+ connectProjectM36,
10+ disconnectedTransaction,
11+ transactionGraph,
12+ close,
13+ executeRelationalExpr,
14+ executeDatabaseContextExpr,
15+ executeGraphExpr,
16+ commit,
17+ rollback,
18+ processPersistence,
19+ PersistenceStrategy(..),
20+ RelationalExpr(..),
21+ DatabaseExpr(..),
22+ Attribute(..),
23+ attributesFromList,
24+ Attribute,
25+ AtomType(..)) where
3import ProjectM36.Base
26import ProjectM36.Base
4import ProjectM36.Error
27import ProjectM36.Error
5import Control.Monad.State
28import Control.Monad.State
@@ -7,6 +30,7 @@ import ProjectM36.Transaction
7import ProjectM36.RelationalExpression
30import ProjectM36.RelationalExpression
8import ProjectM36.TransactionGraph
31import ProjectM36.TransactionGraph
9import ProjectM36.TransactionGraph.Persist
32import ProjectM36.TransactionGraph.Persist
33+import ProjectM36.Attribute
10import Data.UUID.V4 (nextRandom)
34import Data.UUID.V4 (nextRandom)
11import Control.Concurrent.STM
35import Control.Concurrent.STM
12import Data.Word
36import Data.Word
test/persistent-driver/test.hs−2
@@ -9,8 +9,6 @@
9{-# LANGUAGE OverloadedStrings #-}
9{-# LANGUAGE OverloadedStrings #-}
10import Test.HUnit
10import Test.HUnit
11import Database.Persist.ProjectM36
11import Database.Persist.ProjectM36
12−import ProjectM36.Base --shouldn't be here
13−import ProjectM36.Attribute --useful functions should be exported through the Client interface
14import ProjectM36.Client
12import ProjectM36.Client
15import qualified ProjectM36.Client as C
13import qualified ProjectM36.Client as C
16import System.Exit
14import System.Exit