toLazyText (fromString s) = fromChunks [S.pack s]
>>> fromString "\55555" "\65533"
showbPrec p (FromStringShow x) = showsToShowb showsPrec p xSince: 2
liftShowbPrec sp sl p (FromStringShow1 x) = showsPrecToShowbPrec (liftShowsPrec (showbPrecToShowsPrec sp) (showbToShows sl)) p xSince: 3
liftShowbPrec2 sp1 sl1 sp2 sl2 p (FromStringShow2 x) = showsPrecToShowbPrec (liftShowsPrec2 (showbPrecToShowsPrec sp1) (showbToShows sl1) (showbPrecToShowsPrec sp2) (showbToShows sl2)) p xSince: 3