[NF] Add more when tests.

Belonging to [master]:
  - OpenModelica/OMCompiler#2334
  - OpenModelica/OpenModelica-testsuite#911

flattening/modelica/scodeinst/Makefile

@@ -614,7 +614,9 @@ Visibility1.mo \
 Visibility2.mo \
 Visibility3.mo \
 Visibility4.mo \
-when1.mo \
+When1.mo \
+When2.mo \
+When3.mo \
 WhenInitial1.mo \
 WhenNested1.mo \
 Wild1.mo \

flattening/modelica/scodeinst/When1.mo

@@ -0,0 +1,23 @@
+// name: When1
+// keywords:
+// status: correct
+// cflags: -d=newInst
+//
+
+model When1
+  Real x;
+equation
+  when time > 1 then
+    reinit(x, 2.0);
+  end when;
+end When1;
+
+// Result:
+// class When1
+//   Real x;
+// equation
+//   when time > 1.0 then
+//     reinit(x, 2.0);
+//   end when;
+// end When1;
+// endResult

flattening/modelica/scodeinst/When2.mo

@@ -0,0 +1,27 @@
+// name: When2
+// keywords:
+// status: correct
+// cflags: -d=newInst
+//
+
+model When2
+  Real x = 1;
+  Boolean b[3];
+equation
+  when b then
+    reinit(x, 2.0);
+  end when;
+end When2;
+
+// Result:
+// class When2
+//   Real x = 1.0;
+//   Boolean b[1];
+//   Boolean b[2];
+//   Boolean b[3];
+// equation
+//   when {b[1], b[2], b[3]} then
+//     reinit(x, 2.0);
+//   end when;
+// end When2;
+// endResult

flattening/modelica/scodeinst/when1.mo → flattening/modelica/scodeinst/When3.mo

@@ -1,21 +1,21 @@
-// name: when1.mo
+// name: When3
 // keywords:
 // status: correct
 // cflags:   -d=newInst
 //
 //
 
-model A
+model When3
   Real x, y;
   Boolean b, b2;
 equation
   when {b, b2} then
     x = y;
   end when;
-end A;
+end When3;
 
 // Result:
-// class A
+// class When3
 //   Real x;
 //   Real y;
 //   Boolean b;
@@ -24,5 +24,5 @@ end A;
 //   when {b, b2} then
 //     x = y;
 //   end when;
-// end A;
+// end When3;
 // endResult