SCM Repository
Annotation of /sml/trunk/src/compiler/MiscUtil/profile/profile.sig
Parent Directory
|
Revision Log
Revision 245 -
(view)
(download)
(as text)
Original Path: sml/branches/SMLNJ/src/compiler/MiscUtil/profile/profile.sig
1 : | monnier | 245 | (* profile.sig |
2 : | * | ||
3 : | * COPYRIGHT (c) 1995 AT&T Bell Laboratories. | ||
4 : | * | ||
5 : | * User interface for controling profiling. | ||
6 : | * | ||
7 : | *) | ||
8 : | |||
9 : | signature PROFILE = | ||
10 : | sig | ||
11 : | |||
12 : | (* set/get the compilation mode *) | ||
13 : | val setProfMode : bool -> unit | ||
14 : | val getProfMode : unit -> bool | ||
15 : | |||
16 : | (* set/get the profile timing mode *) | ||
17 : | val setTimingMode : bool -> unit | ||
18 : | val getTimingMode : unit -> bool | ||
19 : | |||
20 : | val reset : unit -> unit | ||
21 : | (* reset profiling counts to zero. This is done automatically, when | ||
22 : | * the timing mode is enabled by setTimingMode. | ||
23 : | *) | ||
24 : | |||
25 : | val report : TextIO.outstream -> unit | ||
26 : | (* print profiling report to stream *) | ||
27 : | val reportAll : TextIO.outstream -> unit | ||
28 : | (* print profiling report to stream; DON'T suppress zero entries*) | ||
29 : | val reportData: unit -> {name: string, count: int, time: Time.time} list | ||
30 : | (* Return the unformatted data for a report *) | ||
31 : | |||
32 : | end; | ||
33 : | |||
34 : | (* | ||
35 : | * $Log$ | ||
36 : | *) |
root@smlnj-gforge.cs.uchicago.edu | ViewVC Help |
Powered by ViewVC 1.0.0 |