[commit: testsuite] master: Add expected warnings for print020 (02f093a)

[Ian Lynagh]

Repository : ssh://darcs.haskell.org//srv/darcs/testsuite

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/02f093ab5198eb30b51232136363c8333d4391b3

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

commit 02f093ab5198eb30b51232136363c8333d4391b3
Author: Ian Lynagh <ian at well-typed.com>
Date:   Mon Feb 11 18:51:27 2013 +0000

    Add expected warnings for print020

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

 tests/ghci.debugger/scripts/print020.stderr |   31 +++++++++++++++++++++++++++
 1 files changed, 31 insertions(+), 0 deletions(-)

diff --git a/tests/ghci.debugger/scripts/print020.stderr b/tests/ghci.debugger/scripts/print020.stderr
new file mode 100644
index 0000000..296718d
--- /dev/null
+++ b/tests/ghci.debugger/scripts/print020.stderr
@@ -0,0 +1,31 @@
+
+GenericTemplate.hs:219:14: Warning:
+    Pattern bindings containing unlifted types should use an outermost bang pattern:
+      sts1@((HappyCons (st1@(action)) (_)))
+        = happyDrop k (HappyCons (st) (sts))
+    In an equation for `happyMonadReduce':
+        happyMonadReduce k nt fn j tk st sts stk
+          = happyThen1
+              (fn stk tk)
+              (\ r -> happyGoto nt j tk st1 sts1 (r `HappyStk` drop_stk))
+          where
+              sts1@((HappyCons (st1@(action)) (_)))
+                = happyDrop k (HappyCons (st) (sts))
+              drop_stk = happyDropStk k stk
+
+GenericTemplate.hs:226:14: Warning:
+    Pattern bindings containing unlifted types should use an outermost bang pattern:
+      sts1@((HappyCons (st1@(action)) (_)))
+        = happyDrop k (HappyCons (st) (sts))
+    In an equation for `happyMonad2Reduce':
+        happyMonad2Reduce k nt fn j tk st sts stk
+          = happyThen1
+              (fn stk tk)
+              (\ r -> happyNewToken new_state sts1 (r `HappyStk` drop_stk))
+          where
+              sts1@((HappyCons (st1@(action)) (_)))
+                = happyDrop k (HappyCons (st) (sts))
+              drop_stk = happyDropStk k stk
+              off = indexShortOffAddr happyGotoOffsets st1
+              off_i = (off +# nt)
+              ....