Follow output changes (braces in do-notation)

2 files changed, 10 insertions, 10 deletions

diff --git a/testsuite/tests/ghc-regress/arrows/should_fail/T2111.stderr b/testsuite/tests/ghc-regress/arrows/should_fail/T2111.stderr
index cf654dd367..2989759ae5 100644
--- a/testsuite/tests/ghc-regress/arrows/should_fail/T2111.stderr
+++ b/testsuite/tests/ghc-regress/arrows/should_fail/T2111.stderr
@@ -3,18 +3,18 @@ T2111.hs:6:11:
     Illegal 'rec' stmt in a 'do' expression
     In a stmt of a 'do' expression: rec {x <- undefined -< x}
     In the expression:
-        do rec {x <- undefined -< x}
-           undefined -< x
+        do { rec {x <- undefined -< x};
+             undefined -< x }
     In the definition of `foo':
-        foo = do rec {x <- undefined -< x}
-                 undefined -< x
+        foo = do { rec {x <- undefined -< x};
+                   undefined -< x }
 
 T2111.hs:8:12:
     Illegal 'rec' stmt in a 'do' expression
     In a stmt of a 'do' expression: rec {x <- return ('a' : x)}
     In the expression:
-        do rec {x <- return ('a' : x)}
-           putStrLn (take 20 x)
+        do { rec {x <- return ('a' : x)};
+             putStrLn (take 20 x) }
     In the definition of `bar1':
-        bar1 = do rec {x <- return ('a' : x)}
-                  putStrLn (take 20 x)
+        bar1 = do { rec {x <- return ('a' : x)};
+                    putStrLn (take 20 x) }
diff --git a/testsuite/tests/ghc-regress/arrows/should_fail/arrowfail004.stderr b/testsuite/tests/ghc-regress/arrows/should_fail/arrowfail004.stderr
index 3070dfca68..9a9b7489b9 100644
--- a/testsuite/tests/ghc-regress/arrows/should_fail/arrowfail004.stderr
+++ b/testsuite/tests/ghc-regress/arrows/should_fail/arrowfail004.stderr
@@ -3,6 +3,6 @@ arrowfail004.hs:12:14:
     Illegal constructor `T' in a 'proc' pattern
       Proc patterns cannot use existentials or GADTs
     In the pattern: T x
-    In the expression: proc (T x) -> do returnA -< T x
+    In the expression: proc (T x) -> do { returnA -< T x }
     In the definition of `panic':
-        panic = proc (T x) -> do returnA -< T x
+        panic = proc (T x) -> do { returnA -< T x }