diff options
author | Sylvain Henry <sylvain@haskus.fr> | 2022-05-09 09:23:36 +0200 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-05-09 16:26:36 -0400 |
commit | a4fbb589fd176e6c2f6648dea6c93e25668f1db8 (patch) | |
tree | b6e38fe2eb982307f07a8d68aeb7d39b11651c58 /testsuite/tests/simplStg/should_compile | |
parent | 158bd65984245a1a563c747e7d5afd1b03d82a1d (diff) | |
download | haskell-a4fbb589fd176e6c2f6648dea6c93e25668f1db8.tar.gz |
STG: only print cost-center if asked to
Diffstat (limited to 'testsuite/tests/simplStg/should_compile')
-rw-r--r-- | testsuite/tests/simplStg/should_compile/T19717.stderr | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/testsuite/tests/simplStg/should_compile/T19717.stderr b/testsuite/tests/simplStg/should_compile/T19717.stderr index f2aadf53a5..07a90c5706 100644 --- a/testsuite/tests/simplStg/should_compile/T19717.stderr +++ b/testsuite/tests/simplStg/should_compile/T19717.stderr @@ -8,11 +8,11 @@ Foo.f :: forall {a}. a -> [GHC.Maybe.Maybe a] let { sat [Occ=Once1] :: GHC.Maybe.Maybe a [LclId] = - CCCS GHC.Maybe.Just! [x1]; } in + GHC.Maybe.Just! [x1]; } in let { sat [Occ=Once1] :: [GHC.Maybe.Maybe a] [LclId] = - CCCS :! [sat GHC.Types.[]]; + :! [sat GHC.Types.[]]; } in : [sat sat]; }; |