Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Annotation of /sml/trunk/src/eXene/lib/iccc/xatom-tbl.sml
ViewVC logotype

Annotation of /sml/trunk/src/eXene/lib/iccc/xatom-tbl.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 651 - (view) (download)

1 : monnier 2 (* xatom-tbl.sml
2 :     *
3 :     * Hash tables of XAtoms.
4 :     *)
5 :    
6 :     structure XAtomTbl = HashTableFn (struct
7 :     type hash_key = XProtTypes.atom
8 :     fun hashVal (XProtTypes.XAtom n) = n
9 :     fun sameKey (XProtTypes.XAtom a1, XProtTypes.XAtom a2) = (a1 = a2)
10 :     end);
11 :    

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0