[commit: base] master: add test for #7457 (4f9f1c0)

[Simon Marlow]

Repository : ssh://darcs.haskell.org//srv/darcs/packages/base

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/4f9f1c0282980a79782b19be3969eb428032193b

>---------------------------------------------------------------

commit 4f9f1c0282980a79782b19be3969eb428032193b
Author: Simon Marlow <marlowsd at gmail.com>
Date:   Mon Jan 28 09:40:37 2013 +0000

    add test for #7457

>---------------------------------------------------------------

 tests/T7457.hs     |    2 ++
 tests/T7457.stdout |    1 +
 tests/all.T        |    2 ++
 3 files changed, 5 insertions(+), 0 deletions(-)

diff --git a/tests/T7457.hs b/tests/T7457.hs
new file mode 100644
index 0000000..5f73aad
--- /dev/null
+++ b/tests/T7457.hs
@@ -0,0 +1,2 @@
+import Text.Printf
+main = printf "%*sx\n" (-(3::Int)) "hi"
diff --git a/tests/T7457.stdout b/tests/T7457.stdout
new file mode 100644
index 0000000..93b570a
--- /dev/null
+++ b/tests/T7457.stdout
@@ -0,0 +1 @@
+hi x
diff --git a/tests/all.T b/tests/all.T
index c0e0439..05b639b 100644
--- a/tests/all.T
+++ b/tests/all.T
@@ -122,3 +122,5 @@ test('T7034', normal, compile_and_run, [''])
 
 test('qsem001', normal, compile_and_run, [''])
 test('qsemn001', normal, compile_and_run, [''])
+
+test('T7457', normal, compile_and_run, [''])