From d361b5cb163316d4e0c56cab30301e18b548afff Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Roman=20Smr=C5=BE?= Date: Sun, 19 Apr 2026 21:02:51 +0200 Subject: Arbitrary expressions as variable values --- src/Run/Monad.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/Run/Monad.hs') diff --git a/src/Run/Monad.hs b/src/Run/Monad.hs index 7a1d3c5..f4444e8 100644 --- a/src/Run/Monad.hs +++ b/src/Run/Monad.hs @@ -52,7 +52,7 @@ data TestEnv = TestEnv data TestState = TestState { tsGlobals :: GlobalDefs - , tsLocals :: [ ( VarName, SomeVarValue ) ] + , tsLocals :: [ ( VarName, SomeExpr ) ] , tsDisconnectedUp :: Set NetworkNamespace , tsDisconnectedBridge :: Set NetworkNamespace , tsNodePacketLoss :: Map NetworkNamespace Scientific -- cgit v1.2.3