Browse Source

Fixed zero const issue.

woollybah 9 năm trước cách đây
mục cha
commit
0a7eccc0aa
1 tập tin đã thay đổi với 6 bổ sung1 xóa
  1. 6 1
      expr.bmx

+ 6 - 1
expr.bmx

@@ -426,7 +426,12 @@ Type TConstExpr Extends TExpr
 							b :+ 1
 							i :+ 1
 						Wend
-						value = String.FromBytes(buf, b)
+						
+						If leading0 Then
+							value = "0"
+						Else
+							value = String.FromBytes(buf, b)
+						End If
 					Else
 						value = "0"
 					End If