- Add code to codegen/dump cast to record types

git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@13866 f25d12d1-65f4-0310-ae8a-bbce733d8d8e
OpenModelica · Nov 12, 2012 · 413c8ea · 413c8ea
1 parent ac81a22
commit 413c8ea
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 0 deletions.
diff --git a/Compiler/Template/CodegenC.tpl b/Compiler/Template/CodegenC.tpl
@@ -7119,6 +7119,7 @@ case CAST(__) then
     let from = expTypeFromExpShort(exp)
     let &preExp += 'cast_<%from%>_array_to_<%to%>(&<%expVar%>, &<%tvar%>);<%\n%>'
     '<%tvar%>'
+  case T_COMPLEX(complexClassType=rec as RECORD(__))   then '(*((struct <%underscorePath(rec.path)%>*)&<%expVar%>))'
   else 
     '(<%expVar%>) /* could not cast, using the variable as it is */'
 end daeExpCast;

diff --git a/Compiler/Template/ExpressionDumpTpl.tpl b/Compiler/Template/ExpressionDumpTpl.tpl
@@ -65,6 +65,11 @@ match exp
   case TUPLE(__) then 
     let tuple_str = dumpExpList(PR, stringDelimiter, ", ")
     '(<%tuple_str%>)'
+  case CAST(ty=DAE.T_COMPLEX(__)) then
+    /* TODO: Add this. Keep it not to mess with flat code for now */
+    let exp_str = dumpExp(exp, stringDelimiter)
+    let ty_str = dumpType(ty)
+    '<% if typeinfo() then '/*<%ty_str%>*/'%><%exp_str%>'
   case CAST(__) then
     let exp_str = dumpExp(exp, stringDelimiter)
     let ty_str = dumpType(ty)