Changeset 337 for trunk/Include/Classes/System/IO/Stream.ab

Timestamp:

Sep 22, 2007, 12:32:25 PM (17 years ago)

Author:

dai

Message:

index.abを一つにまとめた。

File:

• trunk/Include/Classes/System/IO/Stream.ab (modified) (2 diffs)

trunk/Include/Classes/System/IO/Stream.ab

@@ -46 +46 @@
     Virtual Sub EndWrite(ByRef asyncResult As System.IAsyncResult): End Sub
     Abstract Sub Flush()
-    Abstract Function Read(ByRef buffer[] As Byte, offset As Long, count As Long) As Long
+    Abstract Function Read(buffer As *Byte, offset As Long, count As Long) As Long
 
     Virtual Function ReadByte() As Long
         Dim b As Byte
-        Dim ret = Read(b, 0, 1)
+        Dim ret = Read(VarPtr(b), 0, 1)
         If ret <> 0 Then
             Return b
@@ -60 +60 @@
     Abstract Function Seek(offset As Int64, origin As SeekOrigin) As Long
     Abstract Sub SetLength(value As Int64)
-    Abstract Sub Write(ByRef buffer[] As Byte, offset As Long, count As Long)
+    Abstract Sub Write(buffer As *Byte, offset As Long, count As Long)
 
     Virtual Sub WriteByte(b As Byte)
-        Write(b, 0, 1)
+        Write(VarPtr(b), 0, 1)
     End Sub
 Protected