remove completed 'TODO'

This commit is contained in:
crumbtoo
2023-11-15 10:01:00 -07:00
parent 2701119615
commit 7c4d8f8306

View File

@@ -54,7 +54,6 @@ instance Pretty Prim where
prettyPrec (IntP n) = withPrec maxBound $ IStr $ show n ++ "#" prettyPrec (IntP n) = withPrec maxBound $ IStr $ show n ++ "#"
prettyPrec IntAddP = withPrec maxBound $ "+#" prettyPrec IntAddP = withPrec maxBound $ "+#"
-- TODO: lens
data Stats = Stats data Stats = Stats
{ _stsReductions :: Int { _stsReductions :: Int
, _stsAllocations :: Int , _stsAllocations :: Int