Changeset 617 for trunk

Timestamp:

Aug 25, 2008, 12:41:54 AM (16 years ago)

Author:

dai

Message:

64bitビルドするとキャスト警告になるため、As指定を行った。

File:

• trunk/ab5.0/ablib/src/Classes/System/IO/MemoryStream.ab (modified) (2 diffs)

trunk/ab5.0/ablib/src/Classes/System/IO/MemoryStream.ab

@@ -185 +185 @@
     Virtual Function Capacity() As Long
         If This.pointer = 0 Then Throw New ObjectDisposedException("MemoryStream: This stream has closed.")
-        Return This.size(This.pointer)
+        Return This.size(This.pointer) As Long
     End Function
 
@@ -405 +405 @@
     End Function
 
-    Function size(p As VoidPtr) As Long
+    Function size(p As VoidPtr) As SIZE_T
 #ifdef NOT_USE_GC
         Return HeapSize(This.handle,0,p)