home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1989 / 09 / modula / lib.arc / TIMEDATE.DEF < prev    next >
Encoding:
Modula Definition  |  1987-06-21  |  351 b   |  21 lines
  1. DEFINITION MODULE TimeDate;
  2.  
  3. (* (C) Copyright 1987 Fitted Software Tools. All rights reserved. *)
  4.  
  5.  
  6. TYPE Time = RECORD
  7.               day, minute, millisec :CARDINAL;
  8.             END;
  9.  
  10.  
  11. PROCEDURE GetTime( VAR time :Time );
  12. (*
  13.     get the system time
  14. *)
  15.  
  16. PROCEDURE SetTime( time :Time );
  17. (*
  18.     set the system time
  19. *)
  20.  
  21. END TimeDate.