toLazyText (fromText t) = fromChunks [t]
showsPrec p (FromTextShow x) = showbToShows showbPrec p xSince: 2
liftShowsPrec sp sl p (FromTextShow1 x) = showbPrecToShowsPrec (liftShowbPrec (showsPrecToShowbPrec sp) (showsToShowb sl)) p xSince: 3
liftShowsPrec2 sp1 sl1 sp2 sl2 p (FromTextShow2 x) = showbPrecToShowsPrec (liftShowbPrec2 (showsPrecToShowbPrec sp1) (showsToShowb sl1) (showsPrecToShowbPrec sp2) (showsToShowb sl2)) p xSince: 3