浏览代码

Fixed detecting wrong type for string conversion.

woollybah 9 年之前
父节点
当前提交
55fa3f2e3d
共有 1 个文件被更改,包括 2 次插入1 次删除
  1. 2 1
      ctranslator.bmx

+ 2 - 1
ctranslator.bmx

@@ -1348,7 +1348,8 @@ t:+"NULLNULLNULL"
 
 			If TStringType(src) Then
 				Local tmp:String
-				If IsPointerType( dst, 0, TType.T_SHORT_PTR ) Then
+
+				If IsPointerType( dst, 0, TType.T_SHORT_PTR ) Or IsPointerType( dst, TType.T_SHORT, TType.T_PTR ) Then
 					tmp = CreateLocal2(NewPointerType(TType.T_SHORT), t)
 				Else
 					tmp = CreateLocal2(NewPointerType(TType.T_BYTE), t)