diff options
| author | Roman Smrž <roman.smrz@seznam.cz> | 2024-11-09 19:29:06 +0100 |
|---|---|---|
| committer | Roman Smrž <roman.smrz@seznam.cz> | 2024-11-09 19:29:06 +0100 |
| commit | 6447095bcffd101507afb65854da22bd4ee6fcaa (patch) | |
| tree | 749b7ef6b13aaeb209013f26546f97e8d6670c8b /src/Test.hs | |
| parent | 0c8bad166577f9973ba5701aee5ca5d9a3f3bc5d (diff) | |
Move withVar into MonadEval type class
Diffstat (limited to 'src/Test.hs')
| -rw-r--r-- | src/Test.hs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/Test.hs b/src/Test.hs index 24a4c72..58c8667 100644 --- a/src/Test.hs +++ b/src/Test.hs @@ -76,8 +76,9 @@ newtype SourceLine = SourceLine Text class MonadFail m => MonadEval m where - lookupVar :: VarName -> m SomeVarValue - rootNetwork :: m Network + lookupVar :: VarName -> m SomeVarValue + rootNetwork :: m Network + withVar :: ExprType e => VarName -> e -> m a -> m a newtype VarName = VarName Text |