diff options
Diffstat (limited to 'src/HSVIS/Pretty.hs')
| -rw-r--r-- | src/HSVIS/Pretty.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/HSVIS/Pretty.hs b/src/HSVIS/Pretty.hs index 0f98da3..cc8cb2a 100644 --- a/src/HSVIS/Pretty.hs +++ b/src/HSVIS/Pretty.hs @@ -12,5 +12,8 @@ instance Pretty Void where prettyPrec :: Pretty a => Int -> a -> String prettyPrec d x = prettysPrec d x "" +prettys :: Pretty a => a -> ShowS +prettys = prettysPrec 0 + pretty :: Pretty a => a -> String pretty x = prettyPrec minBound x |