on ca59541 help sign in
17 lines 840 B history raw
1module ProjectM36.Server.Config where
2import ProjectM36.Client
4data ServerConfig = ServerConfig { persistenceStrategy :: PersistenceStrategy,
5 databaseName :: DatabaseName,
6 bindHost :: Hostname,
7 bindPort :: Port,
8 ghcPkgPaths :: [String] -- used for AtomFunction dynamic compilation
9 }
11defaultServerConfig :: ServerConfig
12defaultServerConfig = ServerConfig { persistenceStrategy = NoPersistence,
13 databaseName = "base",
14 bindHost = "127.0.0.1",
15 bindPort = 6543,
16 ghcPkgPaths = []
17 }