Commit ecbb3179 authored by Haye Böhm's avatar Haye Böhm

Add CLI options for toggling distributed mode

parent b8b732f8
Pipeline #13778 failed with stage
in 1 minute and 31 seconds
...@@ -142,6 +142,8 @@ where ...@@ -142,6 +142,8 @@ where
("Specify the folder containing the temporary files\ndefault: " +++ defaults.tempDirPath) ("Specify the folder containing the temporary files\ndefault: " +++ defaults.tempDirPath)
, Option [] ["sapldir"] (ReqArg (\p->fmap \o->{o & saplDirPath=p}) "PATH") , Option [] ["sapldir"] (ReqArg (\p->fmap \o->{o & saplDirPath=p}) "PATH")
("Specify the folder containing the sapl files\ndefault: " +++ defaults.saplDirPath) ("Specify the folder containing the sapl files\ndefault: " +++ defaults.saplDirPath)
, Option [] ["distributed"] (NoArg (fmap \o->{o & distributed=True}))
"Enable distributed mode (populate the symbols share)"
] ]
onStartup :: (Task a) -> StartableTask | iTask a onStartup :: (Task a) -> StartableTask | iTask a
...@@ -215,7 +217,7 @@ defaultEngineOptions world ...@@ -215,7 +217,7 @@ defaultEngineOptions world
, sessionTime = {tv_sec=60,tv_nsec=0} // 1 minute, (the client pings every 10 seconds by default) , sessionTime = {tv_sec=60,tv_nsec=0} // 1 minute, (the client pings every 10 seconds by default)
, persistTasks = False , persistTasks = False
, autoLayout = True , autoLayout = True
, distributed = True , distributed = False
, timeout = Just 500 , timeout = Just 500
, webDirPath = appDir </> appName +++ "-www" , webDirPath = appDir </> appName +++ "-www"
, storeDirPath = appDir </> appName +++ "-data" </> "stores" , storeDirPath = appDir </> appName +++ "-data" </> "stores"
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment