atom-table.sml

这是我们参加06年全国开源软件的竞赛作品

(* atom-table.sml
 *
 * COPYRIGHT (c) 1996 AT&T Research.
 *
 * Hash tables of atoms.
 *)

structure AtomTable = HashTableFn (struct
      type hash_key = Atom.atom
      val hashVal = Atom.hash
      val sameKey = Atom.sameAtom
    end);