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 ca34f1c..29ed938 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>
-- 
1.7.10.4