1 files changed, 18 insertions, 0 deletions
diff --git a/lib/compiler/test/core_fold_SUITE_data/nested_call_in_case.core b/lib/compiler/test/core_fold_SUITE_data/nested_call_in_case.core
new file mode 100644
index 0000000000..c46906b2ed
--- /dev/null
+++ b/lib/compiler/test/core_fold_SUITE_data/nested_call_in_case.core
@@ -0,0 +1,18 @@
+module 'nested_call_in_case' ['a'/2]
+    attributes []
+
+'a'/2 =
+    fun (_x,_y) ->
+        case call 'erlang':'>'
+                 (call 'erlang':'length'
+                      (_x), _y) of
+          <'true'> when 'true' ->
+              'yes'
+          <'false'> when 'true' ->
+              'no'
+          ( <_omega> when 'true' ->
+                primop 'match_fail'
+                    ('if_clause')
+            -| ['compiler_generated'] )
+        end
+end