浏览代码

Fixed literals in mx2cc

Mark Sibly 6 年之前
父节点
当前提交
f53dbc333d
共有 1 个文件被更改,包括 10 次插入7 次删除
  1. 10 7
      src/mx2cc/translator_cpp.monkey2

+ 10 - 7
src/mx2cc/translator_cpp.monkey2

@@ -1996,25 +1996,28 @@ Class Translator_CPP Extends Translator
 		If ptype
 			
 			If ptype.IsIntegral
-				    
+
+				Return TransType( value.type )+"("+value.value+")"
+#rem
 				If value.value="0" Return TransType( value.type )+"(0)"
 				
 				Select value.type
 				Case Type.IntType
 					Local ivalue:=Int( value.value )
 					If String( ivalue )=value.value Return value.value
-				Case Type.UIntType 'Return value.value+"u"
+				Case Type.UIntType
 					Local ivalue:=UInt( value.value )
-					If String( ivalue )=value.value Return value.value+"u"
-				Case Type.LongType 'Return value.value+"l"
+					If String( ivalue )=value.value Return "bbUInt("+value.value+")"
+				Case Type.LongType
 					Local ivalue:=Long( value.value )
-					If String( ivalue )=value.value Return value.value+"l"
-				Case Type.ULongType 'Return value.value+"ul"
+					If String( ivalue )=value.value Return "bbLong("+value.value+")"
+				Case Type.ULongType
 					Local ivalue:=ULong( value.value )
-					If String( ivalue )=value.value Return value.value+"ul"
+					If String( ivalue )=value.value Return "bbULong("+value.value+")"
 				End
 				
 				Return TransType( value.type )+"("+value.value+")"
+#end				
 				
 			Else If ptype.IsReal