- use Types.elabType instead of Algorithm.getTypeExpType

- use match instead of matchcontinue in ClassInf.getStateName


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

Compiler/FrontEnd/Algorithm.mo

@@ -409,9 +409,10 @@ protected
   DAE.Type ty;
 algorithm
   ty := Types.getPropType(p);
-  t := getTypeExpType(ty);
+  t := Types.elabType(ty);
 end getPropExpType;
 
+/*
 protected function getTypeExpType "function: getTypeExpType
   Returns the expression type for a given Type module type. Used only by
   getPropExpType."
@@ -434,9 +435,10 @@ algorithm
       // record assignments (which actually work just fine). // sjoelund // 2009-05-07
       //print("Warning complex_varList not implemented for Array_assign\n");
       then fail();
-    case ((_,_)) then DAE.ET_OTHER();  /* was fail but records must be handled somehow */
+    case ((_,_)) then DAE.ET_OTHER();  / was fail but records must be handled somehow
   end matchcontinue;
 end getTypeExpType;
+*/
 
 public function makeIf "function: makeIf
   This function creates an `DAE.STMT_IF\' construct, checking that the types

Compiler/FrontEnd/ClassInf.mo

@@ -321,8 +321,7 @@ public function getStateName "function: getStateName
   input State inState;
   output Absyn.Path outPath;
 algorithm
-  outPath :=
-  matchcontinue (inState)
+  outPath := match (inState)
     local
       Absyn.Path p;
     case UNKNOWN(path = p) then p;
@@ -353,7 +352,7 @@ algorithm
     case META_POLYMORPHIC(p) then p;
 
     case _ then Absyn.IDENT("#getStateName failed#");
-  end matchcontinue;
+  end match;
 end getStateName;
 
 protected function printEventStr