acw/cryptonum
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix printing.

Browse Source
This commit is contained in:
Adam Wick
2019-11-27 16:23:13 -08:00
parent 14ccd6c2b9
commit 4d724a5a6e
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
generation/src/Base.hs
View File

@@ -79,7 +79,7 @@ buildDebugExp i top acc
buildPrints :: Word -> String -> [Stmt Span] buildPrints :: Word -> String -> [Stmt Span]
buildPrints entries printer = go (entries - 1) buildPrints entries printer = go (entries - 1)
where where
litStr = Token mempty (LiteralTok (StrTok ("{:" ++ printer ++ "}")) Nothing) litStr = Token mempty (LiteralTok (StrTok ("{:016" ++ printer ++ "}")) Nothing)
--Lit [] (Str ("{:" ++ printer ++ "}") Cooked Unsuffixed mempty) mempty --Lit [] (Str ("{:" ++ printer ++ "}") Cooked Unsuffixed mempty) mempty
go 0 = [] go 0 = []
go x = go x =