add test for ticket:5680

OpenModelica · Nov 5, 2019 · 388e08b · 388e08b
1 parent 757c374
commit 388e08b
Show file tree

Hide file tree

Showing 2 changed files with 43 additions and 1 deletion.
diff --git a/testsuite/openmodelica/interactive-API/Makefile b/testsuite/openmodelica/interactive-API/Makefile
@@ -79,7 +79,8 @@ UsesAnnotation1.mos \
 Ticket5506.mos \
 Ticket5548.mos \
 Ticket5571.mos \
-Ticket5565.mos
+Ticket5565.mos \
+Ticket5680.mos
 
 
 # test that currently fail. Move up when fixed.

diff --git a/testsuite/openmodelica/interactive-API/Ticket5680.mos b/testsuite/openmodelica/interactive-API/Ticket5680.mos
@@ -0,0 +1,41 @@
+// name: Ticket5680.mos
+// keywords:
+// status: correct
+//
+// Tests if the -m Modelica output doesn't interfere with list()
+//
+
+
+setCommandLineOptions({"-m"}); getErrorString();
+
+loadString("model test end test;","test"); getErrorString();
+listFile(test); getErrorString();
+list(test); getErrorString();
+addComponent(integrator, Modelica.Blocks.Continuous.Integrator,test,annotate=Placement(visible=true, transformation=transformation(origin={-40,12}, extent={{-10,-10},{10,10}}, rotation=0))); getErrorString();
+listFile(test); getErrorString();
+list(test); getErrorString();
+
+// Result:
+// {true}
+// ""
+// true
+// ""
+// "model test
+// end test;"
+// ""
+// "model test
+// end test;"
+// ""
+// true
+// ""
+// "model test
+//   Modelica.Blocks.Continuous.Integrator integrator annotation(
+//     Placement(visible = true, transformation(origin = {-40, 12}, extent = {{-10, -10}, {10, 10}}, rotation = 0)));
+// end test;"
+// ""
+// "model test
+//   Modelica.Blocks.Continuous.Integrator integrator annotation(
+//     Placement(visible = true, transformation(origin = {-40, 12}, extent = {{-10, -10}, {10, 10}}, rotation = 0)));
+// end test;"
+// ""
+// endResult