2003-12-02 Ben Maurer <bmaurer@users.sourceforge.net>

	* support.cs: Make the PtrHashtable use only one
	instance of its comparer.

svn path=/trunk/mcs/; revision=20715

diff --git a/mcs/mcs/ChangeLog b/mcs/mcs/ChangeLog
index 38afb9314d0d8ddc065b16d56a88d18c2411b1be..7fd710fff38b5cde9d2e4462cc3c1c499216252f 100755 (executable)
--- a/mcs/mcs/ChangeLog
+++ b/mcs/mcs/ChangeLog
@@ -1,3 +1,8 @@
+2003-12-02 Ben Maurer  <bmaurer@users.sourceforge.net>
+
+       * support.cs: Make the PtrHashtable use only one
+       instance of its comparer.
+
 2003-11-30  Zoltan Varga  <vargaz@freemail.hu>
 
        * typemanager.cs: Fix lookup of GetNamespaces.

diff --git a/mcs/mcs/support.cs b/mcs/mcs/support.cs
index a40d4607b9490fd24d8282310330791e157ce565..f897058451b07c76962bc47570464b4fdc7833a1 100755 (executable)
--- a/mcs/mcs/support.cs
+++ b/mcs/mcs/support.cs
@@ -206,7 +206,11 @@ namespace Mono.CSharp {
        }
 
        class PtrHashtable : Hashtable {
-               class PtrComparer : IComparer {
+               sealed class PtrComparer : IComparer {
+                       private PtrComparer () {}
+                       
+                       public static PtrComparer Instance = new PtrComparer ();
+                       
                        public int Compare (object x, object y)
                        {
                                if (x == y)
@@ -218,7 +222,7 @@ namespace Mono.CSharp {
                
                public PtrHashtable ()
                {
-                       comparer = new PtrComparer ();
+                       comparer = PtrComparer.Instance;
                }
        }