- if subs of componentreference are stripped do not use the type from…

… DAE.CREF to generate a new DAE.CREF from stripped componentreference

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

Compiler/BackendDAEUtil.mo

@@ -1360,7 +1360,7 @@ algorithm
     case (DAE.ASUB(exp = DAE.ARRAY(array = (DAE.CREF(componentRef = cr, ty = ty) :: _)), sub = subs))
       equation
         cr = ComponentReference.crefStripLastSubs(cr);
-        e = Expression.makeCrefExp(cr, ty);
+        e = Expression.crefExp(cr);
       then
         // adrpo: TODO! FIXME! check if this is TYPE correct!
         //        shouldn't we change the type using the subs?
@@ -1369,7 +1369,7 @@ algorithm
     case (DAE.ASUB(exp = DAE.MATRIX(scalar = (((DAE.CREF(componentRef = cr, ty = ty), _) :: _) :: _)), sub = subs))
       equation
         cr = ComponentReference.crefStripLastSubs(cr);
-        e = Expression.makeCrefExp(cr, ty);
+        e = Expression.crefExp(cr);
       then
         // adrpo: TODO! FIXME! check if this is TYPE correct!
         //        shouldn't we change the type using the subs?