This commit is contained in:
crumbtoo
2024-02-13 12:52:06 -07:00
parent 8267548fab
commit 4c9ceb74d1
4 changed files with 8 additions and 4 deletions

View File

@@ -32,7 +32,7 @@ import Rlp.Parse
import Rlp2Core
----------------------------------------------------------------------------------
justHdbg :: String -> IO (Node, Stats)
justHdbg :: String -> IO GmState
justHdbg s = do
p <- evalRLPCIO def (parseRlpProgR >=> desugarRlpProgR $ T.pack s)
withFile "/tmp/t.log" WriteMode $ hdbgProg p