diff --git a/test/Base_Tests/src/Semantic/Multi_Value_Convert_Spec.enso b/test/Base_Tests/src/Semantic/Multi_Value_Convert_Spec.enso index dce2acb20252d..ffce9563aa47b 100644 --- a/test/Base_Tests/src/Semantic/Multi_Value_Convert_Spec.enso +++ b/test/Base_Tests/src/Semantic/Multi_Value_Convert_Spec.enso @@ -57,6 +57,15 @@ add_specs suite_builder = Test.expect_panic Type_Error <| ac:U ac:V . v . should_equal 3.14 + group_builder.specify "case of first" <| + abc = 3.14 : A&B&C + c1 = case abc of + a:A -> a.a + b:B -> b.b + c:C -> c.c + _ -> "what?" + c1 . should_equal "a" + main filter=Nothing = suite = Test.build suite_builder-> add_specs suite_builder