diff options
Diffstat (limited to 'src/Eval.hs')
| -rw-r--r-- | src/Eval.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/Eval.hs b/src/Eval.hs index 5091b49..d331e86 100644 --- a/src/Eval.hs +++ b/src/Eval.hs @@ -28,6 +28,7 @@ import System.Console.Haskeline import System.Directory import System.FilePath.Posix ( takeBaseName ) import System.Mem +import Target import Text.Megaparsec hiding ( State , try ) @@ -408,7 +409,7 @@ dumpFile conf wr conv = do case M.lookup entryFunction env of Nothing -> print $ ContextualError (UndefinedIdentifier entryFunction) (Context "" (_nicePath conf)) - Just EnvDef { _exp = e } -> optimizeToTarget conf e >>= wr . conv + Just EnvDef { _exp = e } -> toTarget conf e >>= wr . conv evalFileConf :: EvalConf -> IO () evalFileConf conf = do |