Changeset 631 for trunk/ab5.0/ablib/src/Classes/System/Collections/ObjectModel/ReadOnlyCollection.ab

Timestamp:

Sep 22, 2008, 5:31:01 AM (16 years ago)

Author:

NoWest

Message:

List<T>、Stack<T>、Queue<T>を相互にIEnumerator<T>を使って変換できるようにしました。

List<T>クラスからReadOnlyCollectionの呼び出しがコンパイルできません。
どうしても問題を再現できなかったので、皆さんの所でも問題が発生するか確認のためにupしておきます。
やっぱり問題がおきたら、RevertするかListのAsReadOnlyメソッドをコメントアウトしてください。

File:

• trunk/ab5.0/ablib/src/Classes/System/Collections/ObjectModel/ReadOnlyCollection.ab (modified) (3 diffs)

trunk/ab5.0/ablib/src/Classes/System/Collections/ObjectModel/ReadOnlyCollection.ab

@@ -6 +6 @@
 
 Class ReadOnlyCollection<T>
-    Implements Generic.IList<T>
-    list As Generic.IList<T>
+    Implements System.Collections.Generic.IList<T>
+    list As System.Collections.Generic.IList<T>
 
 Public
     'Collection クラスの新しいインスタンスを初期化します。 
     Sub ReadOnlyCollection ()
-        This.list = New Generic.List<T>
+        Dim l = New System.Collections.Generic.List<T>
+        This.list = l
     End Sub
-    Sub ReadOnlyCollection ( list As Generic.IList<T> )
+    Sub ReadOnlyCollection ( list As System.Collections.Generic.IList<T> )
         This.list = list
     End Sub
@@ -35 +36 @@
     'Collection をラップする IList ラッパーを取得します。 
     Function Items () As Generic.IList<T>
-        Return list
+        Return This
     End Function
 
@@ -57 +58 @@
 
     'Collection を反復処理する列挙子を返します。 
-    Override Function GetEnumerator () As Generic.IEnumerator<T>
+    Override Function GetEnumerator () As System.Collections.Generic.IEnumerator<T>
         Return This.list.GetEnumerator()
     End Function