@@ -1,5 +1,28 @@
11{-# 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
326import ProjectM36.Base
427import ProjectM36.Error
528import Control.Monad.State
@@ -7,6 +30,7 @@ import ProjectM36.Transaction
730import ProjectM36.RelationalExpression
831import ProjectM36.TransactionGraph
932import ProjectM36.TransactionGraph.Persist
33+import ProjectM36.Attribute
1034import Data.UUID.V4 (nextRandom)
1135import Control.Concurrent.STM
1236import Data.Word