[Pkg-haskell-commits] [SCM] haskell-testpack branch, master, updated. debian/1.0.2-1-4-gb0d6b36

[John Goerzen]

The following commit has been merged in the master branch:
commit 8ea90022d7acf53e50d3a70576b2a5c9b7eb23eb
Author: John Goerzen <jgoerzen at complete.org>
Date:   Sun Nov 14 04:42:46 2004 +0100

    Checkpointing
    
    Keywords:
    
    
    (jgoerzen at complete.org--projects/missingh--head--0.5--patch-32)

diff --git a/ChangeLog b/ChangeLog
index 72196ac..06475fe 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -2,6 +2,18 @@
 # arch-tag: automatic-ChangeLog--jgoerzen at complete.org--projects/missingh--head--0.5
 #
 
+2004-11-13 21:42:46 GMT	John Goerzen <jgoerzen at complete.org>	patch-32
+
+    Summary:
+      Checkpointing
+    Revision:
+      missingh--head--0.5--patch-32
+
+
+    modified files:
+     ChangeLog libsrc/MissingH/Printf.hs
+
+
 2004-11-13 21:32:54 GMT	John Goerzen <jgoerzen at complete.org>	patch-31
 
     Summary:
diff --git a/libsrc/MissingH/Printf.hs b/libsrc/MissingH/Printf.hs
index 4ccb816..24f95cc 100644
--- a/libsrc/MissingH/Printf.hs
+++ b/libsrc/MissingH/Printf.hs
@@ -31,11 +31,12 @@ This module provides various helpful utilities for using a C-style printf().
 Written by John Goerzen, jgoerzen\@complete.org
 -}
 
-module MissingH.Printf(sprintf,
+module MissingH.Printf(
                        Value(..),
                        PFRun(..),
                        PFType(..),
                        sprintf,
+                       printf,
                        wrapper
                        ) where
 
@@ -83,5 +84,8 @@ wrapper f v = toValue $ sprintf_real f v
 sprintf :: PFRun a => String -> a
 sprintf f = pfrun $ wrapper f
 
+printf :: (PFRun a, PFType a) => String -> a -> IO ()
+printf f v = putStr (sprintf f v)
+
 --printf :: PFRun a => String -> a -> IO ()
 

-- 
haskell-testpack