소스 검색

Win32 has different nan/inf text values.

woollybah 11 년 전
부모
커밋
74ece01428
1개의 변경된 파일8개의 추가작업 그리고 8개의 파일을 삭제
  1. 8 8
      ctranslator.bmx

+ 8 - 8
ctranslator.bmx

@@ -193,13 +193,13 @@ Type TCTranslator Extends TTranslator
 			If TIntType( ty ) Return value
 			If TLongType( ty ) Return value+"LL"
 			If TFloatType( ty ) Then
-				If value = "nan.0" Then
+				If value = "nan.0" Or value = "1.#IND0000" Then
 					Return "bbPOSNANf"
-				Else If value="-nan.0" Then
+				Else If value="-nan.0" Or value = "-1.#IND0000" Then
 					Return "bbNEGNANf"
-				Else If value = "inf.0" Then
+				Else If value = "inf.0" Or value = "1.#INF0000" Then
 					Return "bbPOSINFf"
-				Else If value = "-inf.0" Then
+				Else If value = "-inf.0" Or value = "-1.#INF0000" Then
 					Return "bbNEGINFf"
 				Else
 					If value.ToLower().Find("e")>=0 Then
@@ -212,13 +212,13 @@ Type TCTranslator Extends TTranslator
 				End If
 			End If
 			If TDoubleType( ty ) Then
-				If value = "nan.0" Then
+				If value = "nan.0" Or value = "1.#IND0000" Then
 					Return "bbPOSNANd"
-				Else If value="-nan.0" Then
+				Else If value="-nan.0" Or value = "-1.#IND0000" Then
 					Return "bbNEGNANd"
-				Else If value = "inf.0" Then
+				Else If value = "inf.0" Or value = "1.#INF0000" Then
 					Return "bbPOSINFd"
-				Else If value = "-inf.0" Then
+				Else If value = "-inf.0" Or value = "-1.#INF0000" Then
 					Return "bbNEGINFd"
 				Else
 					If value.ToLower().Find("e") >=0 Then