generated from tpl/purs
fix: show uses toString
This commit is contained in:
parent
01f844b2d2
commit
4904879515
@ -231,7 +231,7 @@ derive instance Generic Proquint _
|
||||
derive instance Ord Proquint
|
||||
derive instance Eq Proquint
|
||||
instance Show Proquint where
|
||||
show = genericShow
|
||||
show pq = "(fromString " <> show (toString pq) <> ")"
|
||||
|
||||
pad :: Int -> Proquint -> Proquint
|
||||
pad n pq@(Proquint segs) =
|
||||
|
Loading…
Reference in New Issue
Block a user