svtimesh.inc 1014 B

1234567891011121314151617181920212223242526272829303132
  1. const
  2. VTIMES_UNITS_PER_SECOND = 60;
  3. type
  4. Pvtimes = ^_vtimes;
  5. _vtimes = record
  6. vm_utime : longint;
  7. vm_stime : longint;
  8. vm_idsrss : dword;
  9. vm_ixrss : dword;
  10. vm_maxrss : longint;
  11. vm_majflt : longint;
  12. vm_minflt : longint;
  13. vm_nswap : longint;
  14. vm_inblk : longint;
  15. vm_oublk : longint;
  16. end;
  17. P_vtimes = ^_vtimes;
  18. function vtimes(__current:Pvtimes; __child:Pvtimes):longint;cdecl;external clib name 'vtimes';
  19. { ---------------------------------------------------------------------
  20. Borland compatibility types
  21. ---------------------------------------------------------------------}
  22. Type
  23. Tvtimes = _vtimes;
  24. function vtimes(var __current: _vtimes; var __child: _vtimes):longint;cdecl;external clib name 'vtimes';
  25. function vtimes(var __current: _vtimes; __child: pvtimes):longint;cdecl;external clib name 'vtimes';
  26. function vtimes( __current: pvtimes; var __child: _vtimes):longint;cdecl;external clib name 'vtimes';