fix: test: fix periodic transaction pretty-printing (#1988)

This commit is contained in:
Simon Michael 2023-02-16 18:05:28 -10:00
parent 7a9b0fd94c
commit 0c74744626

View File

@ -57,7 +57,8 @@ _ptgenspan str spn = do
-- for better pretty-printing:
instance Show PeriodicTransaction where
show PeriodicTransaction{..} =
printf "PeriodicTransactionPP {%s, %s, %s, %s, %s, %s, %s, %s, %s}"
printf "PeriodicTransactionPP {%s, %s, %s, %s, %s, %s, %s, %s, %s, %s}"
-- Warning, be careful to keep these synced ^ v
("ptperiodexpr=" ++ show ptperiodexpr)
("ptinterval=" ++ show ptinterval)
("ptspan=" ++ show (show ptspan))