diff options
Diffstat (limited to 'src/Helper.hs')
| -rw-r--r-- | src/Helper.hs | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/Helper.hs b/src/Helper.hs index d7064c1..00b4ce5 100644 --- a/src/Helper.hs +++ b/src/Helper.hs @@ -10,6 +10,7 @@ import qualified Data.BitString as Bit import qualified Data.ByteString as Byte import qualified Data.ByteString.Char8 as C import Data.List +import qualified Data.Map as M import Text.Megaparsec data Context = Context @@ -125,9 +126,11 @@ data EvalConf = EvalConf , evalTests :: Bool , nicePath :: String , evalPaths :: [String] - , tested :: [String] } data Environment = Environment [(EnvDef, Environment)] +data EnvCache = EnvCache + { _imported :: M.Map String Environment + } type Program = S.State Environment instance Semigroup Environment where |