From 55bea941c94b9bbd668208e5a5c6af0d6f79e692 Mon Sep 17 00:00:00 2001
From: sof <unknown>
Date: Thu, 16 Sep 1999 09:17:25 +0000
Subject: [PATCH] [project @ 1999-09-16 09:17:25 by sof] NumExts.showListWith
doc'ed
---
ghc/docs/libraries/NumExts.sgml | 21 +++++++++++++++++++--
1 file changed, 19 insertions(+), 2 deletions(-)
diff --git a/ghc/docs/libraries/NumExts.sgml b/ghc/docs/libraries/NumExts.sgml
index ca34f1cf8e98..29ed938f58b5 100644
--- a/ghc/docs/libraries/NumExts.sgml
+++ b/ghc/docs/libraries/NumExts.sgml
@@ -19,6 +19,8 @@ showIntAtBase :: Integral a
-> (a -> Char) -- digit to char
-> a -- number to show.
-> ShowS
+
+showListWith :: (a -> ShowS) -> [a] -> ShowS
</verb> </tscreen>
Notes:
@@ -42,8 +44,6 @@ Notes:
could be defined
<tscreen><verb>
-
-</verb></tscreen>
showHex :: Integral a => a -> ShowS
showHex n r =
showString "0x" $
@@ -52,4 +52,21 @@ showHex n r =
toChrHex d
| d < 10 = chr (ord '0' + fromIntegral d)
| otherwise = chr (ord 'a' + fromIntegral (d - 10))
+</verb></tscreen>
+
+<item>
+ <tt/showListWith/ is strictly speaking not a '<tt/NumExts/' kind
+ of function, but it's sometimes useful in conjunction with the
+ other <tt/show*/ functions that <tt/NumExts/ exports. It is
+ the non-overloaded version of <tt/showList/, allowing you to
+ supply the <tt/shows/ function to use per list element. For
+ instance,
+
+<tscreen><code>
+ putStrLn (NumExts.showListWith NumExts.showHex [0..16])
+</code></tscreen>
+
+ will print out the elements of <tt/[1..16]/ in hexidecimal form.
+
+
</itemize>
--
GitLab