home *** CD-ROM | disk | FTP | other *** search
/ Solo Programadores 22 / SOLO_22.iso / packages / win32ada / data.z / win32-utime.ads < prev    next >
Encoding:
Text File  |  1996-03-15  |  2.0 KB  |  50 lines
  1. -- $Source: /home/harp/1/proto/monoBANK/winnt/win32-utime.ads,v $ 
  2. -- $Revision: 1.7 $ $Date: 96/03/15 12:56:20 $ $Author: stm $ 
  3. -- See end of file for Copyright (c) information.
  4.  
  5. with Win32.Types;
  6.  
  7. package Win32.Utime is
  8.  
  9.     type utimbuf is                                         -- utime.h:55
  10.         record
  11.             actime : Win32.Types.time_t;                    -- utime.h:56
  12.             modtime: Win32.Types.time_t;                    -- utime.h:57
  13.         end record;
  14.  
  15.     function utime(p1: Win32.PSTR;
  16.                    p2: access utimbuf)
  17.                        return Win32.INT;                    -- utime.h:69
  18.  
  19.     function futime(p1: Win32.INT;
  20.                     p2: access utimbuf)
  21.                         return Win32.INT;                   -- utime.h:70
  22.  
  23. private
  24.  
  25.     pragma Convention(C, utimbuf);                          -- utime.h:55
  26.  
  27.     pragma Import(C, utime, "_utime");                      -- utime.h:69
  28.     pragma Import(C, futime, "_futime");                    -- utime.h:70
  29.  
  30. -------------------------------------------------------------------------------
  31. --
  32. -- THIS FILE AND ANY ASSOCIATED DOCUMENTATION IS PROVIDED WITHOUT CHARGE
  33. -- "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESS OR IMPLIED, INCLUDING
  34. -- BUT NOT LIMITED TO THE IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR
  35. -- FITNESS FOR A PARTICULAR PURPOSE.  The user assumes the entire risk as to
  36. -- the accuracy and the use of this file.  This file may be used, copied,
  37. -- modified and distributed only by licensees of Microsoft Corporation's
  38. -- WIN32 Software Development Kit in accordance with the terms of the 
  39. -- licensee's End-User License Agreement for Microsoft Software for the
  40. -- WIN32 Development Kit.
  41. --
  42. -- Copyright (c) Intermetrics, Inc. 1995
  43. -- Portions (c) 1985-1994 Microsoft Corporation with permission.
  44. -- Microsoft is a registered trademark and Windows and Windows NT are
  45. -- trademarks of Microsoft Corporation.
  46. --
  47. -------------------------------------------------------------------------------
  48.  
  49. end Win32.Utime;
  50.