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/cm/paths/tstamp.sml
ViewVC logotype

Diff of /sml/trunk/src/cm/paths/tstamp.sml

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

revision 735, Tue Nov 21 12:15:55 2000 UTC revision 1342, Mon Aug 11 20:46:00 2003 UTC
# Line 28  Line 28 
28    
29      fun max (TSTAMP t, TSTAMP t') = TSTAMP (if Time.< (t, t') then t' else t)      fun max (TSTAMP t, TSTAMP t') = TSTAMP (if Time.< (t, t') then t' else t)
30        | max _ = NOTSTAMP        | max _ = NOTSTAMP
31    
32        fun toString NOTSTAMP = "none"
33          | toString (TSTAMP t) = Time.toString t
34  end  end

Legend:
Removed from v.735  
changed lines
  Added in v.1342

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