add test for ticket:5249

Belonging to [master]:
  - OpenModelica/OMCompiler#2836
  - OpenModelica/OpenModelica-testsuite#1094

Author: adrpo

flattening/modelica/scodeinst/Makefile

@@ -742,6 +742,7 @@ Terminate1.mo \
 TerminateInvalid1.mo \
 TerminateInvalid2.mo \
 TestSampleNoClock.mos \
+Ticket5249.mo \
 Time1.mo \
 Time2.mo \
 Time3.mo \

flattening/modelica/scodeinst/Ticket5249.mo

@@ -0,0 +1,36 @@
+// name:     Ticket5249.mo
+// keywords: tests if array binding works fine
+// status:   correct
+//
+// cflags:   -d=newInst
+//
+
+model M
+
+  record X
+    Real a;
+	Real b;
+  end X;
+  constant Integer n = 2;
+  X x[n] = {X(1, 2), X(2, 3)};
+  
+  model H
+    X x;
+  end H;
+  
+  H h[n](x = x);
+end M;
+
+// Result:
+// class M
+//   constant Integer n = 2;
+//   Real x[1].a = 1.0;
+//   Real x[1].b = 2.0;
+//   Real x[2].a = 2.0;
+//   Real x[2].b = 3.0;
+//   Real h[1].x.a = x[1].a;
+//   Real h[1].x.b = x[1].b;
+//   Real h[2].x.a = x[2].a;
+//   Real h[2].x.b = x[2].b;
+// end M;
+// endResult

partest/runtests.pl

@@ -86,7 +86,7 @@
     print("  -cppruntime   Run ONLY the slow cppruntime tests.\n");
     print("  -nocpp        Do not run any cppruntime tests.\n");
     print("  -f            Only run fast tests.\n");
-    print("  -file         Reads testcases from the given file instead of from a makefile.\n");
+    print("  -file=file    Reads testcases from the given file instead of from a makefile.\n");
     print("  -jN           Use N threads.\n");
     print("  -nodb         Don't store timing data.\n");
     print("  -nosavedb     Don't overwrite stored timing data.\n");