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

SCM Repository

[smlnj] View of /sml/trunk/src/system/Basis/Implementation/timer.sig
ViewVC logotype

View of /sml/trunk/src/system/Basis/Implementation/timer.sig

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1505 - (download) (as text) (annotate)
Thu Jun 17 20:41:47 2004 UTC (16 years, 7 months ago) by mblume
File size: 623 byte(s)
structure Timer now up to spec
(* timer.sig
 *
 * COPYRIGHT (c) 1995 AT&T Bell Laboratories.
 *
 *)
signature TIMER = sig

    type cpu_timer
    type real_timer

    val startCPUTimer:  unit -> cpu_timer
    val totalCPUTimer:  unit -> cpu_timer

    val checkCPUTimes:  cpu_timer
			-> { nongc: { usr: Time.time, sys: Time.time },
			     gc: { usr: Time.time, sys: Time.time } }
    val checkCPUTimer:  cpu_timer -> { usr: Time.time, sys: Time.time }
    val checkGCTime:    cpu_timer -> Time.time

    val startRealTimer: unit -> real_timer
    val totalRealTimer: unit -> real_timer

    val checkRealTimer: real_timer -> Time.time

end (* TIMER *)

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