Introduce normalizeWithM for monadic normalization (#371)

dhall-lang · Nov 6, 2018 · 096c039 · 096c039
1 parent 7aba791
commit 096c039
Show file tree

Hide file tree

Showing 4 changed files with 150 additions and 132 deletions.
diff --git a/dhall/src/Dhall.hs b/dhall/src/Dhall.hs
@@ -211,7 +211,7 @@ data EvaluateSettings = EvaluateSettings
 defaultEvaluateSettings :: EvaluateSettings
 defaultEvaluateSettings = EvaluateSettings
   { _startingContext = Dhall.Context.empty
-  , _normalizer      = Dhall.Core.ReifiedNormalizer (const Nothing)
+  , _normalizer      = Dhall.Core.ReifiedNormalizer (const (pure Nothing))
   , _standardVersion = Dhall.Binary.defaultStandardVersion
   }