fix: test: fix periodic transaction pretty-printing (#1988)
This commit is contained in:
parent
7a9b0fd94c
commit
0c74744626
@ -57,7 +57,8 @@ _ptgenspan str spn = do
|
|||||||
-- for better pretty-printing:
|
-- for better pretty-printing:
|
||||||
instance Show PeriodicTransaction where
|
instance Show PeriodicTransaction where
|
||||||
show PeriodicTransaction{..} =
|
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)
|
("ptperiodexpr=" ++ show ptperiodexpr)
|
||||||
("ptinterval=" ++ show ptinterval)
|
("ptinterval=" ++ show ptinterval)
|
||||||
("ptspan=" ++ show (show ptspan))
|
("ptspan=" ++ show (show ptspan))
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user