ソースを参照

Fixed varptr local variable type generation. Fixes #215

woollybah 9 年 前
コミット
f7398d1f2e
1 ファイル変更1 行追加1 行削除
  1. 1 1
      expr.bmx

+ 1 - 1
expr.bmx

@@ -1898,7 +1898,7 @@ Type TIndexExpr Extends TExpr
 
 
 		' for functions and index access, use a new local variable
 		' for functions and index access, use a new local variable
 		If Not TVarExpr(expr) And Not TMemberVarExpr(expr) Then
 		If Not TVarExpr(expr) And Not TMemberVarExpr(expr) Then
-			Local tmp:TLocalDecl=New TLocalDecl.Create( "", expr.exprType, expr,, True )
+			Local tmp:TLocalDecl=New TLocalDecl.Create( "", TType.MapVarPointerToPointerType(expr.exprType.Copy()), expr,, True )
 			tmp.Semant()
 			tmp.Semant()
 			Local v:TVarExpr = New TVarExpr.Create( tmp )
 			Local v:TVarExpr = New TVarExpr.Create( tmp )
 			expr = New TStmtExpr.Create( New TDeclStmt.Create( tmp ), v ).Semant()
 			expr = New TStmtExpr.Create( New TDeclStmt.Create( tmp ), v ).Semant()