From ed4c7a0a410bca5492b8d079fe5d96b55209f458 Mon Sep 17 00:00:00 2001 From: Valentin Reis Date: Thu, 14 Feb 2019 11:19:35 -0600 Subject: [PATCH] nrm socket cleaning update --- share/openmc/settings.xml | 4 ++-- src/Argo/Stack.hs | 5 +++-- 2 files changed, 5 insertions(+), 4 deletions(-) diff --git a/share/openmc/settings.xml b/share/openmc/settings.xml index af20a40..f7def98 100644 --- a/share/openmc/settings.xml +++ b/share/openmc/settings.xml @@ -2,8 +2,8 @@ eigenvalue 100 - 300 - 100 + 10 + 2 -10.751819999999999 -10.751819999999999 36.007 10.751819999999999 10.751819999999999 236.0066 diff --git a/src/Argo/Stack.hs b/src/Argo/Stack.hs index 60a3ec6..da67857 100644 --- a/src/Argo/Stack.hs +++ b/src/Argo/Stack.hs @@ -27,12 +27,12 @@ import Control.Foldl as Fold import Text.Show.Pretty import System.Environment -cleanLeftovers :: WorkingDirectory -> Shell () +cleanLeftovers :: WorkingDirectory -> Shell () --TODO cleanLeftovers (WorkingDirectory wd) = do printInfo "Cleaning working(output) directory." cleanLog wd printInfo "Cleaning sockets." - CM.mapM_ cleanSocket ["/tmp/nrm-downstream-in", "/tmp/nrm-upstream-in"] + CM.mapM_ cleanSocket ["/tmp/nrm-downstream-in", "/tmp/nrm-upstream-in", "/tmp/nrm-downstream-event"] checkFsAttributes :: FilePath -> Shell () checkFsAttributes workingDirectory = do @@ -193,6 +193,7 @@ runStack sa@StackArgs {..} = do CM.mapM_ cleanSocket [ "/tmp/nrm-downstream-in" + , "/tmp/nrm-downstream-event" , "/tmp/nrm-upstream-in" , "/tmp/nrm-upstream-event" ] -- 2.26.2