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/branches/rt-transition/Util/splay-map-fn.sml
ViewVC logotype

Diff of /smlnj-lib/branches/rt-transition/Util/splay-map-fn.sml

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

revision 3, Sat Oct 4 23:33:46 1997 UTC revision 29, Thu Mar 12 01:05:59 1998 UTC
# Line 45  Line 45 
45                  })                  })
46                }                }
47            | (_,SplayNil) => raise LibBase.Impossible "SplayMapFn.insert SplayNil"            | (_,SplayNil) => raise LibBase.Impossible "SplayMapFn.insert SplayNil"
48        fun insert' ((k, x), m) = insert(m, k, x)
49    
50    (* Look for an item, return NONE if the item doesn't exist *)    (* Look for an item, return NONE if the item doesn't exist *)
51      fun find (EMPTY,_) = NONE      fun find (EMPTY,_) = NONE

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

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