atom-table.sml

来自「这是我们参加06年全国开源软件的竞赛作品」· SML 代码 · 共 14 行

(* 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);