Changeset 12955

Timestamp:

10/07/10 22:37:17 (11 years ago)

Author:

ehuelsmann

Message:

In CLOS supporting code (Layout.java), replace a synchronized
hash table type by a ConcurrentHashMap? for non-blocking readers.

File:

• trunk/abcl/src/org/armedbear/lisp/Layout.java (modified) (3 diffs)

trunk/abcl/src/org/armedbear/lisp/Layout.java

@@ -34 +34 @@
 package org.armedbear.lisp;
 
+import java.util.concurrent.ConcurrentHashMap;
 import static org.armedbear.lisp.Lisp.*;
 
@@ -39 +40 @@
 {
   private final LispObject lispClass;
-  public final EqHashTable slotTable;
+  public final ConcurrentHashMap<LispObject, LispObject> slotTable;
 
   final LispObject[] slotNames;
@@ -83 +84 @@
   }
 
-  private EqHashTable initializeSlotTable(LispObject[] slotNames)
-  {
-    EqHashTable ht = new EqHashTable(slotNames.length, NIL, NIL);
+  private ConcurrentHashMap initializeSlotTable(LispObject[] slotNames)
+  {
+    ConcurrentHashMap ht = new ConcurrentHashMap(slotNames.length);
     for (int i = slotNames.length; i-- > 0;)
       ht.put(slotNames[i], Fixnum.getInstance(i));