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 /smlnj-lib/trunk/Util/list-map-fn.sml
ViewVC logotype

Diff of /smlnj-lib/trunk/Util/list-map-fn.sml

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

revision 28, Thu Mar 12 01:05:57 1998 UTC revision 29, Thu Mar 12 01:05:59 1998 UTC
# Line 25  Line 25 
25            in            in
26              f l              f l
27            end            end
28        fun insert' ((k, x), m) = insert(m, k, x)
29    
30    (* Look for an item, return NONE if the item doesn't exist *)    (* Look for an item, return NONE if the item doesn't exist *)
31      fun find (l, key) = let      fun find (l, key) = let

Legend:
Removed from v.28  
changed lines
  Added in v.29

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