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

Timestamp:

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

Author:

dai

Message:

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

File:

• trunk/Include/Classes/System/IO/FileStream.ab (modified) (4 diffs)

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

@@ -297 +297 @@
     End Sub
 
-    Override Function Read(ByRef buffer[] As Byte, offset As Long, count As Long) As Long
+    Override Function Read( buffer As *Byte, offset As Long, count As Long) As Long
         If This.CanRead() Then
             Dim ret As DWord
@@ -316 +316 @@
     End Function
 
-    Override Function ReadByte() As Long
-        Dim b As Byte
-        Dim ret = Read(b, 0, 1)
-        If ret <> 0 Then
-            Return b As Long
-        Else
-            Return -1
-        End If
-    End Function
 /*  ReferenceEquals*/
 
@@ -388 +379 @@
     End Sub
 
-    Override Sub Write(ByRef buffer[] As Byte, offset As Long, count As Long)
+    Override Sub Write(buffer As *Byte, offset As Long, count As Long)
         If This.CanWrite() Then
             Dim ret As DWord
@@ -405 +396 @@
     End Sub
 
-    Override Sub WriteByte(b As Byte)
-        Write(b, 0, 1)
-    End Sub
-
 Protected
     Override Function CreateWaitHandle() As System.Threading.WaitHandle