fixed incorrect array casts

Author: totalspectrum

Changelog.txt

@@ -1,3 +1,6 @@
+Version 7.0.1
+- Fixed incorrect casts of arrays
+
 Version 7.0.0
 - Added Spin2 structures (basically small objects)
 - Added Spin2 TASK functions

frontends/hltransform.c

@@ -372,6 +372,9 @@ doSimplifyAssignments(AST **astptr, int insertCasts, int atTopLevel)
         AST *typ = ExprType(ast);
         if (typ && TypeSize(typ) > LONG_SIZE) {
             AstReportAs(ast, &saveinfo);
+            if (IsArrayType(typ)) {
+                typ = ArrayToPointerType(typ);
+            }
             AST *cond = ast->left;
             AST *ifcond = ast->right->left;
             AST *elsecond = ast->right->right;
@@ -382,7 +385,7 @@ doSimplifyAssignments(AST **astptr, int insertCasts, int atTopLevel)
                               AstTypedAssignStmt(tempvar, ifcond, typ),
                               AstTypedAssignStmt(tempvar, elsecond, typ)));
 
-            AST *stmt = NewAST(AST_SEQUENCE,
+            AST *stmt = NewAST(AST_STMTLIST,
                                newif,
                                tempvar);
             *astptr = ast = stmt;