Changeset 631 for trunk/ab5.0/ablib/src/Classes/System/Collections/Generic/Stack.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/Generic/Stack.ab (modified) (1 diff)

trunk/ab5.0/ablib/src/Classes/System/Collections/Generic/Stack.ab

@@ -15 +15 @@
     End Sub
 
+    Sub initialize()
+        This.items = GC_malloc(1)
+    End Sub
 Public
     Sub Stack ()
-        This.items = GC_malloc( 1 )
+        This.initialize()
     End Sub
 
     Sub Stack ( capacity As Long )
-        This.items = GC_malloc( 1 )
+        This.initialize()
         If capacity > 0 Then
             This.size = capacity
             Realloc(capacity)
         End If
+    End Sub
+
+    Sub Stack ( enumerator As IEnumerator<T> )
+        This.initialize()
+        While enumerator.MoveNext()
+            This.Push(enumerator.Current())
+        Wend
     End Sub