Added test case for #3633.

OpenModelica · Jan 21, 2016 · 0af2de1 · 0af2de1
1 parent 949f860
commit 0af2de1
Show file tree

Hide file tree

Showing 2 changed files with 26 additions and 0 deletions.
diff --git a/metamodelica/meta/Makefile b/metamodelica/meta/Makefile
@@ -70,6 +70,7 @@ MatchCaseInteractive3.mos \
 MatchDotNotation.mos \
 MatchElse1.mos \
 MatchIfEquation1.mos \
+MatchNoRetCall.mos \
 MatchShadowing.mo \
 OptimizeContinue.mo \
 OptimizeMatchToIfExp.mo \

diff --git a/metamodelica/meta/MatchNoRetCall.mos b/metamodelica/meta/MatchNoRetCall.mos
@@ -0,0 +1,25 @@
+// name:     MatchNoRetCall
+// keywords: match noretcall #3633
+// status:   correct
+// cflags:   +g=MetaModelica
+//
+// Checks that using a match as a non-returning call works.
+//
+
+loadString("
+  function test
+    input Integer n;
+  algorithm
+    _ := match n
+      case 1 then n;
+    end match;
+  end test;
+");
+test(1);
+getErrorString();
+
+// Result:
+// true
+//
+// ""
+// endResult