Browse Source

Fixed null enum default arg. Fixes #523.

Brucey 5 năm trước cách đây
mục cha
commit
db48057673
1 tập tin đã thay đổi với 5 bổ sung1 xóa
  1. 5 1
      ctranslator.bmx

+ 5 - 1
ctranslator.bmx

@@ -5516,7 +5516,11 @@ End Rem
 		EndIf
 
 		If TEnumType(expr.exprType) Then
-			Return Expr.Eval()
+			If TCastExpr(expr) And TNullExpr(TCastExpr(expr).expr) Then
+				Return TransValue(expr.exprType, Null)
+			Else
+				Return Expr.Eval()
+			End If
 		End If
 
 		'If TObjectType(expr.exprType) And TNullDecl(TObjectType(expr.exprType).classDecl) Then