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