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

SCM Repository

[smlnj] Diff of /sml/trunk/src/smlnj-lib/Util/hash2-table-fn.sml
ViewVC logotype

Diff of /sml/trunk/src/smlnj-lib/Util/hash2-table-fn.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 7, Sun Jan 18 00:59:30 1998 UTC revision 8, Sun Jan 18 01:01:29 1998 UTC
# Line 43  Line 43 
43              n_items = ref 0              n_items = ref 0
44            }            }
45    
46      (* remove all elements from the table *)
47        fun clear (TBL{tbl1, tbl2, n_items, ...}) = (
48              HTRep.clear(!tbl1); HTRep.clear(!tbl2); n_items := 0)
49    
50    (* Remove an item, returning the item.  The table's exception is raised if    (* Remove an item, returning the item.  The table's exception is raised if
51     * the item doesn't exist.     * the item doesn't exist.
52     *)     *)

Legend:
Removed from v.7  
changed lines
  Added in v.8

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