[NF] Add default argument test.

Belonging to [master]:
  - OpenModelica/OMCompiler#2649
  - OpenModelica/OpenModelica-testsuite#1031

Author: perost

flattening/modelica/scodeinst/FuncDefaultArg2.mo

@@ -0,0 +1,40 @@
+// name: FuncDefaultArg2
+// keywords:
+// status: correct
+// cflags: -d=newInst
+//
+// Checks that default arguments are replaced with the correct expression in the
+// function call.
+// 
+
+function f
+  input Real u1;
+  input Real u2 = u1;
+  output Real y;
+algorithm
+  y := u1 + u2;
+end f;
+
+model FuncDefaultArg2
+  input Real a(start = 1);
+  output Real b;
+equation
+  b = f(a);
+end FuncDefaultArg2;
+
+// Result:
+// function f
+//   input Real u1;
+//   input Real u2 = u1;
+//   output Real y;
+// algorithm
+//   y := u1 + u2;
+// end f;
+//
+// class FuncDefaultArg2
+//   input Real a(start = 1.0);
+//   output Real b;
+// equation
+//   b = f(a, a);
+// end FuncDefaultArg2;
+// endResult

flattening/modelica/scodeinst/Makefile

@@ -433,6 +433,7 @@ FuncBuiltinVectorWrongType1.mo \
 FuncBuiltinZeros.mo \
 FuncClassParam.mo \
 FuncDefaultArg1.mo \
+FuncDefaultArg2.mo \
 FuncDuplicateParams1.mo \
 FuncExtends.mo \
 FuncInnerParam.mo \