Changeset 193 for Include/Classes

Timestamp:

Mar 28, 2007, 10:55:14 AM (17 years ago)

Author:

イグトランス (egtra)

Message:

Stringのデフォルトコンストラクタでもメモリ確保するように戻す、api_imm.sbpの修正

File:

• Include/Classes/System/String.ab (modified) (2 diffs)

Include/Classes/System/String.ab

@@ -21 +21 @@
 
     Sub String()
-        Chars = 0
+        Chars = _System_malloc(SizeOf (StrChar)) '0
+        Chars[0] = 0
         m_Length = 0
     End Sub
@@ -304 +305 @@
     End Function
 Private
-    Static Const Function ConcatStrChar(text1 As *StrChar, text1Length As Long, text2 As *StrChar, text2Length As Long) As String
+    Static Function ConcatStrChar(text1 As *StrChar, text1Length As Long, text2 As *StrChar, text2Length As Long) As String
         With ConcatStrChar
             .AllocStringBuffer(text1Length + text2Length)