Index: trunk/Include/Classes/System/Collections/Generic/Dictionary.ab
===================================================================
--- trunk/Include/Classes/System/Collections/Generic/Dictionary.ab	(revision 310)
+++ trunk/Include/Classes/System/Collections/Generic/Dictionary.ab	(revision 311)
@@ -8,13 +8,13 @@
 
 Namespace Detail
-	Class Pair<Key, T>
+	Class Pair
 	Public
-		Sub Pair(key As Key, value As T)
+		Sub Pair(key As Object, value As Object)
 			Key = key
 			Value = value
 		End Sub
 
-		Key As Key
-		Value As T
+		Key As Object
+		Value As Object
 	End Class
 End Namespace 'Detail
@@ -41,7 +41,5 @@
 '	Virtual Function Item(key As Key) As T
 	Virtual Function Item(key As Key) As Object
-
 		Imports System.Collections.Generic.Detail
-		Imports System.Diagnostics
 
 		If Object.ReferenceEquals(key, Nothing) Then
@@ -57,6 +55,4 @@
 			For i = 0 To ELM(a.Count)
 				Dim pair = a[i] As Pair
-				Dim s = pair.Key.ToString + " " + pair.Value.ToString
-				Trace.Write(s)
 				If pair.Key.Equals(key) Then
 					Return pair.Value