Changeset 262

Timestamp:

May 27, 2007, 3:33:43 PM (18 years ago)

Author:

NoWest

Message:

Stream及びFileStreamをIAsyncResultインターフェイス、WaitHandleクラスがそれぞれがSystem名前空間、System.Threading名前空間に入ったことに対応。
ただし、クラス名の頭に名前空間を付けただけで原因不明のバグが発生してコンパイラが落ちる現象が発生。要調査

Location:

Include/Classes/System/IO

Files:

• FileStream.ab (modified) (3 diffs)
• Stream.ab (modified) (3 diffs)
• misc.ab (modified) (1 diff)

Include/Classes/System/IO/FileStream.ab

@@ -227 +227 @@
 
 Public
-    Override Function BeginRead(ByRef buffer[] As Byte, offset As Long, count As Long, callback As AsyncCallback, state As Object) As IAsyncResult
-        'TODO
-    End Function
-
-    Override Function BeginWrite(ByRef buffer[] As Byte, offset As Long, count As Long, callback As AsyncCallback, state As Object) As IAsyncResult
+    Override Function BeginRead(ByRef buffer[] As Byte, offset As Long, count As Long, callback As AsyncCallback, state As Object) As System.IAsyncResult
+        'TODO
+    End Function
+
+    Override Function BeginWrite(ByRef buffer[] As Byte, offset As Long, count As Long, callback As AsyncCallback, state As Object) As System.IAsyncResult
         'TODO
     End Function
@@ -242 +242 @@
 /*  Dispose*/
 
-    Override Sub EndRead(ByRef asyncResult As IAsyncResult)
-        'TODO
-    End Sub
-
-    Override Sub EndWrite(ByRef asyncResult As IAsyncResult)
+    Override Sub EndRead(ByRef asyncResult As System.IAsyncResult)
+        'TODO
+    End Sub
+
+    Override Sub EndWrite(ByRef asyncResult As System.IAsyncResult)
         'TODO
     End Sub
@@ -358 +358 @@
 Protected
     /*非同期ファイル操作に必須だがどうやって実装しようか検討中*/
-    Override Function CreateWaitHandle() As WaitHandle
+    Override Function CreateWaitHandle() As System.Threading.WaitHandle
 '       Return Nothing
     End Function

Include/Classes/System/IO/Stream.ab

@@ -1 @@
-
-#require <Classes/System/misc.ab>
 
 Class Stream
@@ -39 +37 @@
 
 Public
-    Virtual Function BeginRead(ByRef buffer[] As Byte, offset As Long, count As Long, callback As AsyncCallback, state As Object) As IAsyncResult:  End Function
-    Virtual Function BeginWrite(ByRef buffer[] As Byte, offset As Long, count As Long, callback As AsyncCallback, state As Object) As IAsyncResult: End Function
+    Virtual Function BeginRead(ByRef buffer[] As Byte, offset As Long, count As Long, callback As AsyncCallback, state As Object) As System.IAsyncResult:   End Function
+    Virtual Function BeginWrite(ByRef buffer[] As Byte, offset As Long, count As Long, callback As AsyncCallback, state As Object) As System.IAsyncResult:  End Function
     Virtual Sub Close():    End Sub
-    Virtual Function EndRead(ByRef asyncResult As IAsyncResult) As Long:    End Function
-    Virtual Sub EndWrite(ByRef asyncResult As IAsyncResult):    End Sub
+    Virtual Function EndRead(ByRef asyncResult As System.IAsyncResult) As Long: End Function
+    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
@@ -65 +63 @@
     End Sub
 Protected
-    Virtual Function CreateWaitHandle() As WaitHandle:  End Function
+    Virtual Function CreateWaitHandle() As System.Threading.WaitHandle: End Function
 End Class

Include/Classes/System/IO/misc.ab

@@ -1 +1 @@
 
-TypeDef /* [Delegate] */ AsyncCallback = *Sub(ByRef ar As IAsyncResult)
+TypeDef /* [Delegate] */ AsyncCallback = *Sub(ByRef ar As System.IAsyncResult)
 
 Enum SeekOrigin