Browse Source

Fixed passing address of array field as var argument.

woollybah 8 years ago
parent
commit
16e312fde0
1 changed files with 1 additions and 1 deletions
  1. 1 1
      ctranslator.bmx

+ 1 - 1
ctranslator.bmx

@@ -454,7 +454,7 @@ Type TCTranslator Extends TTranslator
 						t:+ "&"
 						t:+ "&"
 					End If
 					End If
 				Else If TArrayType(ty) And (ty._flags & TType.T_VAR) Then
 				Else If TArrayType(ty) And (ty._flags & TType.T_VAR) Then
-					If TVarExpr(arg) And TArrayType(TVarExpr(arg).exprType) And Not (arg.exprType._flags & TType.T_VAR) Then
+					If (TVarExpr(arg) And TArrayType(TVarExpr(arg).exprType) Or (TMemberVarExpr(arg) And TArrayType(TMemberVarExpr(arg).exprType))) And Not (arg.exprType._flags & TType.T_VAR) Then
 						t:+ "&"
 						t:+ "&"
 					End If
 					End If
 				Else If TObjectType(ty) And (ty._flags & TType.T_VAR) Then
 				Else If TObjectType(ty) And (ty._flags & TType.T_VAR) Then