summaryrefslogtreecommitdiff
path: root/testsuite/tests/simplCore/should_compile/T15631.stdout
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/tests/simplCore/should_compile/T15631.stdout')
-rw-r--r--testsuite/tests/simplCore/should_compile/T15631.stdout7
1 files changed, 7 insertions, 0 deletions
diff --git a/testsuite/tests/simplCore/should_compile/T15631.stdout b/testsuite/tests/simplCore/should_compile/T15631.stdout
new file mode 100644
index 0000000000..5a096f25f5
--- /dev/null
+++ b/testsuite/tests/simplCore/should_compile/T15631.stdout
@@ -0,0 +1,7 @@
+ case GHC.List.$wlenAcc
+ case GHC.List.$wlenAcc @ a w 0# of ww2 { __DEFAULT ->
+ case GHC.List.reverse1 @ a w (GHC.Types.[] @ a) of {
+ [] -> case Foo.f1 @ a of { GHC.Types.I# v1 -> GHC.Prim.+# ww2 v1 };
+ case GHC.List.$wlenAcc
+ case Foo.$wf @ a w of ww [Occ=Once] { __DEFAULT ->
+ case Foo.$wf @ a w of ww { __DEFAULT -> GHC.Types.I# ww }