Fix two invalid function references

2018-04-27 21:00:45 -07:00 · 2018-04-27 21:00:45 -07:00 · ad0a53ed24
parent 7282d7c153
commit ad0a53ed24
1 changed files with 2 additions and 2 deletions
--- a/main/Main.hs
+++ b/main/Main.hs
@ -88,9 +88,9 @@ main = do
                    | normalize opts =
                      liftIO . print . prettyNValueNF <=< normalForm
                    | values opts  =
-                      liftIO . print <=< renderNValueProv
+                      liftIO . print <=< prettyNValueProv
                    | otherwise  =
-                      liftIO . print <=< renderNValue
+                      liftIO . print <=< prettyNValue

        if | evaluate opts, tracing opts ->
                 evaluateExpression mpath