Import hs-plugins cvs

examples/printf/002/Main.hs

@@ -0,0 +1,12 @@
+import Printf
+import Control.Exception        ( evaluate )
+
+main = do
+        fn <- evaluate $! printf "%10.4f\n"
+        fn $> (10.0 :: Double)          ! []
+        fn $> (-10.0 :: Double)         ! []
+        fn $> (10.1010 :: Double)       ! []
+        fn $> (0.0 :: Double)           ! []
+        fn $> (0.987654321 :: Double)   ! []
+        fn $> (987654321 :: Double)     ! []
+        fn $> (-987654321 :: Double)     ! []

examples/printf/002/Makefile

@@ -0,0 +1,2 @@
+TOP=../../..
+include ../../eval.mk

examples/printf/002/expected

@@ -0,0 +1,7 @@
+   10.0000
+  -10.0000
+   10.1010
+    0.0000
+    0.9877
+987654321.0000
+-987654321.0000