diff --git a/testsuite/flattening/modelica/scodeinst/Makefile b/testsuite/flattening/modelica/scodeinst/Makefile index 8ece8489d50..71730223559 100644 --- a/testsuite/flattening/modelica/scodeinst/Makefile +++ b/testsuite/flattening/modelica/scodeinst/Makefile @@ -750,6 +750,7 @@ Size2.mo \ Size3.mo \ Size4.mo \ Size5.mo \ +Size6.mo \ SizeInvalidArgs1.mo \ SizeInvalidArgs2.mo \ SizeInvalidIndex1.mo \ diff --git a/testsuite/flattening/modelica/scodeinst/Size6.mo b/testsuite/flattening/modelica/scodeinst/Size6.mo new file mode 100644 index 00000000000..9a5a91bb130 --- /dev/null +++ b/testsuite/flattening/modelica/scodeinst/Size6.mo @@ -0,0 +1,33 @@ +// name: Size6 +// keywords: size +// status: correct +// cflags: -d=newInst +// +// Tests the builtin size operator. +// + +type T = Real[4]; + +model A + T x; +end A; + +model Size6 + Real x[n]; + A a; + parameter Integer n = size(a.x, 1); +end Size6; + +// Result: +// class Size6 +// Real x[1]; +// Real x[2]; +// Real x[3]; +// Real x[4]; +// Real a.x[1]; +// Real a.x[2]; +// Real a.x[3]; +// Real a.x[4]; +// parameter Integer n = 4; +// end Size6; +// endResult