buffering

apps/simplex-stress-test/Main.hs

@@ -4,9 +4,12 @@ import Simplex.StressTest
 import System.Directory
 import Test.Hspec
 import Control.Monad
+import System.IO
 
 main :: IO ()
 main = do
+  hSetBuffering stdout LineBuffering
+  hSetBuffering stderr LineBuffering
   dirExists <- doesDirectoryExist "test"
   when dirExists $ removeDirectoryRecursive "test"
   createDirectoryIfMissing True "test"

scripts/stress-test-linode.sh

@@ -20,7 +20,7 @@ Description=SMP server stress test
 
 [Service]
 Type=simple
-ExecStart=/bin/sh -c "$binary"
+ExecStart=/bin/sh -c 'exec $binary >> $HOME/test.log 2>&1'
 Restart=always
 RestartSec=3