- fixes to make slicing like

    a[1,:] := a[:]; 
  and/or 
    a[2:3,2] := x[2:3]; 
  work:
  - fixed code in indexed_assign_real_array(), index_real_array() and index_alloc_real_array()
  - fixed daeExpCrefRhsIndexSpec() template to generate "zero" dimension size for scalar subscripts for INDEX case:
       (0), make_index_array(1, <%expPart%>), 'S'  
  - added test ArrayAssignWholeDim.mo; but it should be moved to mosfiles to ensure C-runtime invocation
  TODO: the same should be done for integer_array.c; then the character slice coding, i.e. 'S','A','W', can be removed entirely;
        or, perhaps, the slicing operation can be generated inline as appropriate nested for loops (I'll do that for C# generator, then it may be ported back to C++)
- fixed daeExpAsub() template for _get_1D() .. _get_4D() constant index cases ... decremented indexes, because the _get_#D() functions works with zero based indexes
- commented out #include "utility.h" in simulation_events.cpp to enable debugging in Visual Studio
- added NO_INTERACTIVE_DEPENDENCY macro switch used in simulation_runtime.cpp for simpler compilation of simulation runtime in Visual Studio
- added SimCode.cref2simvar(ComponentRef,SimCode)->SimVar function and daeLow field into SimCode.SIMCODE record to enable lookup of representation arrays in templates (C#);
  note that only cref2simvar() is visible from templates, but not the daeLow field which is not added to SimCodeTV.mo; 
    the function needs a SimCode value as a whole, so the implementation is effectively hidden from templates' viewpoint;
  BUT, this is only a workaround for the lack of the needed information in component references themselves (hope they will have it in the future);
  see usage of cref2simvar() in SimCodeCSharp.tpl
- added extern int const specifiers in functionStoreDelayed C++ template to resolve a link problem in VC++ 
- renamed local identifiers named cref to cr or ecr (ecr when of type DAE.Exp) in the C++ templates to disambiguate them from cref() template name (will be checked in the future; now value binding names and template names has separate name scopes, but that will be changed in the next versions of Susan); 
  maybe the cref() template should be renamed to compRef() because there exist fields named cref in SimCodeTV.mo
- simplified several constructs like '<%val%>' to just val and/or like (libs |> lib => lib) to just (libs) in C++ templates
- re-factored some case clauses when they shared the same then part (Susan can have "or" cases,e.g.: case PAT1 case PAT2 case PAT3 then tplExpr ... where the same tplExpr is lexically used for every given case)
- renamed subscriptsTpl() and subscriptTpl() templates to more suitable names subscriptsStr() and subscriptStr()
- added many improvements in C# code generator
- changed some make commands for Susan/C# codegen testing 
- added testmo make command to Makefile.common


git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@5881 f25d12d1-65f4-0310-ae8a-bbce733d8d8e

Author: pavolpr

Compiler/SimCode.mo

@@ -119,6 +119,7 @@ uniontype SimCode
     ExtObjInfo extObjInfo;
     MakefileParams makefileParams;
     DelayedExpression delayedExps;
+    DAELow.DAELow daeLow "hidden from typeview - exprerimental; used by cref2simvar() for cref -> SIMVAR mapping available in templates";
   end SIMCODE;
 end SimCode;
 
@@ -438,7 +439,7 @@ algorithm
 	isScalar := matchcontinue(cref, context)
 		local
 			Boolean res;
-		case (_, FUNCTION_CONTEXT)
+		case (_, FUNCTION_CONTEXT())
 			equation
 				res = crefNoSub(cref);
 			then
@@ -467,7 +468,7 @@ algorithm
     case (DAE.CREF_QUAL(subscriptLst=subs1, componentRef=cref1))
       equation
         subs2 = crefSubs(cref1);
-        subs = Util.listFlatten({subs1, subs2});
+        subs = Util.listFlatten({subs1, subs2}); // ??? is this the same as listAppend(subs1, subs2);
       then subs;
   end matchcontinue;
 end crefSubs;
@@ -505,6 +506,43 @@ algorithm
   outInt := inInt + increment;
 end incrementInt;
 
+public function cref2simvar
+"Used by templates to find SIMVAR for given cref (to gain representaion index info mainly)."
+  input DAE.ComponentRef inCref;
+  input SimCode simCode;
+  output SimVar outSimVar;
+algorithm
+  outSimVar := matchcontinue(inCref, simCode)
+    local
+      DAELow.Variables vars;
+      DAELow.Var daelowvar;
+      DAE.ComponentRef cref, badcref;
+      SimVar sv;
+    
+    case (DAE.CREF_QUAL(ident = "$DER", componentRef = cref), SIMCODE(daeLow = DAELow.DAELOW(orderedVars = vars))) 
+      equation
+        ((daelowvar :: _), _) = DAELow.getVar(cref, vars);
+        sv = dlowvarToSimvar(daelowvar);
+      then derVarFromStateVar(sv);
+    
+    case (cref, SIMCODE(daeLow = DAELow.DAELOW(orderedVars = vars))) 
+      equation
+        ((daelowvar :: _), _) = DAELow.getVar(cref, vars);        
+      then dlowvarToSimvar(daelowvar);
+    
+    case (cref, SIMCODE(daeLow = DAELow.DAELOW(knownVars = vars))) 
+      equation
+        ((daelowvar :: _), _) = DAELow.getVar(cref, vars);        
+      then dlowvarToSimvar(daelowvar);
+    
+    case (cref, _)
+      equation
+        badcref = DAE.CREF_IDENT("ERROR_cref2simvar_failed", DAE.ET_REAL, {});
+      then
+        SIMVAR(badcref, DAELow.STATE(), "", -1, false, DAE.ET_REAL, false,NONE);
+  end matchcontinue;
+end cref2simvar;
+
 public function generateModelCode
   "Generates code for a model by creating a SimCode structure and calling the
    template-based code generator on it."
@@ -1247,7 +1285,8 @@ algorithm
                           algorithmAndEquationAsserts, zeroCrossings,
                           zeroCrossingsNeedSave, helpVarInfo, whenClauses,
                           discreteModelVars, extObjInfo, makefileParams,
-                          DELAYED_EXPRESSIONS(delayedExps, maxDelayedExpIndex));
+                          DELAYED_EXPRESSIONS(delayedExps, maxDelayedExpIndex),
+                          dlow);
       then
         simCode;
     case (_,_,_,_,_,_,_,_,_,_,_)