packages/base/libc/utimeh.inc


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20


type
   Putimbuf = ^utimbuf;
   utimbuf = record
     actime : __time_t;
     modtime : __time_t;
   end;


function utime(__file:Pchar; __file_times:Putimbuf):longint;cdecl;external clib name 'utime';

{ ---------------------------------------------------------------------
    Borland compatibility types
  ---------------------------------------------------------------------}

type
  TUTimeBuffer = utimbuf;
  PUTimeBuffer = ^TUTimeBuffer;

function utime(__file:Pchar; const __file_times: utimbuf):longint;cdecl;external clib name 'utime';