1 files changed, 2 insertions, 0 deletions
diff --git a/Alpha.hs b/Alpha.hs
index 6cc9b18..e53474b 100644
--- a/Alpha.hs
+++ b/Alpha.hs
@@ -245,6 +245,8 @@ wrap lim = Text.words .> wrap_ 0 .> Text.unwords
       where
         lw = Text.length w
 
+-- | Automatically convert any string-like type into any other string-like type,
+-- using types to infer the appropriate conversion.
 str :: (StringConv a b) => a -> b
 str = Protolude.Conv.toS