From a699c3ddd443a2d6113fe3b08f7ae81c510239e6 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roman=20Smr=C5=BE?= <roman.smrz@seznam.cz>
Date: Fri, 9 Jan 2026 21:35:28 +0100
Subject: Improve displayed values for process, network and node types

---
 src/Run/Monad.hs | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/Run/Monad.hs')

diff --git a/src/Run/Monad.hs b/src/Run/Monad.hs
index c742987..f506b62 100644
--- a/src/Run/Monad.hs
+++ b/src/Run/Monad.hs
@@ -44,6 +44,7 @@ data TestEnv = TestEnv
     , teFailed :: TVar (Maybe Failed)
     , teOptions :: TestOptions
     , teNextObjId :: MVar Int
+    , teNextProcId :: MVar Int
     , teProcesses :: MVar [ Process ]
     , teTimeout :: MVar ( Scientific, Integer ) -- ( positive timeout, number of zero multiplications )
     , teGDB :: Maybe (MVar GDB)
-- 
cgit v1.2.3