pretty -> prettyprinter

2024-03-14 06:04:22 -06:00
parent 175e58f13c
commit 623acb3454
13 changed files with 266 additions and 298 deletions
--- a/src/Core2Core.hs
+++ b/src/Core2Core.hs
@@ -37,7 +37,7 @@ core2core p = undefined
 gmPrepR :: (Monad m) => Program' -> RLPCT m Program'
 gmPrepR p = do
    let p' = gmPrep p
-    addDebugMsg "dump-gm-preprocessed" $ render . pretty $ p'
+    addDebugMsg "dump-gm-preprocessed" $ show . out $ p'
    pure p'

 -- | G-machine-specific preprocessing.