1 21 22 package org.armedbear.lisp; 23 24 public class EqualHashTable extends HashTable 25 { 26 public EqualHashTable(int size, LispObject rehashSize, 27 LispObject rehashThreshold) 28 { 29 super(TEST_EQUAL, size, rehashSize, rehashThreshold); 30 } 31 32 protected final boolean equals(LispObject o1, LispObject o2) 33 throws ConditionThrowable 34 { 35 return o1.equal(o2); 36 } 37 } 38 | Popular Tags |