mim/development/mim/vax/mimlib/usage.mud

   1 <SETG USAGE-STUFF <IUVECTOR 18>>
   2
   3 <DEFINE USAGE ("OPT" (STUFF ,USAGE-STUFF))
   4         #DECL ((STUFF) !<UVECTOR [18 FIX]>)
   5         <CALL SYSCALL GETRUSAGE 0 .STUFF>
   6         .STUFF>
   7
   8 <DEFINE PRINT-USAGE ("AUX" (STUFF ,USAGE-STUFF))
   9         #DECL ((STUFF) !<UVECTOR [18 FIX]>)
  10         <USAGE .STUFF>
  11         <PRINTSTRING "User time (sec):">
  12         <INDENT-TO 30>
  13         <PRIN1 <+ <FLOAT <1 .STUFF>> </ <FLOAT <2 .STUFF>> 1000000>>>
  14         <CRLF>
  15         <PRINTSTRING "System time (sec):">
  16         <INDENT-TO 30>
  17         <PRIN1 <+ <FLOAT <3 .STUFF>> </ <FLOAT <4 .STUFF>> 1000000>>>
  18         <CRLF>
  19         <PRINTSTRING "Max resident size (Kb):">
  20         <INDENT-TO 30>
  21         <PRIN1 <5 .STUFF>>
  22         <CRLF>
  23         <PRINTSTRING "Shared memory (Kb-sec):">
  24         <INDENT-TO 30>
  25         <PRIN1 <6 .STUFF>>
  26         <CRLF>
  27         <PRINTSTRING "Unshared data size (Kb-sec):">
  28         <INDENT-TO 30>
  29         <PRIN1 <7 .STUFF>>
  30         <CRLF>
  31         <PRINTSTRING "Unshared stack size (Kb-sec):">
  32         <INDENT-TO 30>
  33         <PRIN1 <8 .STUFF>>
  34         <CRLF>
  35         <PRINTSTRING "Minor page faults:">
  36         <INDENT-TO 30>
  37         <PRIN1 <9 .STUFF>>
  38         <CRLF>
  39         <PRINTSTRING "Major page faults:">
  40         <INDENT-TO 30>
  41         <PRIN1 <10 .STUFF>>
  42         <CRLF>
  43         <PRINTSTRING "Swaps:">
  44         <INDENT-TO 30>
  45         <PRIN1 <11 .STUFF>>
  46         <CRLF>
  47         <PRINTSTRING "Block input operations:">
  48         <INDENT-TO 30>
  49         <PRIN1 <12 .STUFF>>
  50         <CRLF>
  51         <PRINTSTRING "Block output operations:">
  52         <INDENT-TO 30>
  53         <PRIN1 <13 .STUFF>>
  54         <CRLF>
  55         <PRINTSTRING "Ipc messages sent:">
  56         <INDENT-TO 30>
  57         <PRIN1 <14 .STUFF>>
  58         <CRLF>
  59         <PRINTSTRING "Ipc messages received:">
  60         <INDENT-TO 30>
  61         <PRIN1 <15 .STUFF>>
  62         <CRLF>
  63         <PRINTSTRING "Signals delivered:">
  64         <INDENT-TO 30>
  65         <PRIN1 <16 .STUFF>>
  66         <CRLF>
  67         <PRINTSTRING "Vol. context switches:">
  68         <INDENT-TO 30>
  69         <PRIN1 <17 .STUFF>>
  70         <CRLF>
  71         <PRINTSTRING "Invol. context switches:">
  72         <INDENT-TO 30>
  73         <PRIN1 <18 .STUFF>>
  74         ,NULL>