home *** CD-ROM | disk | FTP | other *** search
- INTERFACE;
-
- UNIT TIM (EXACTTIME,DELAY);
-
- PROCEDURE EXACTTIME (VAR hrs, mins, secs: REAL);
- PROCEDURE DELAY (wsecs: REAL);
-
- { This part of the program merely shows how an interface for a unit is
- constructed, and then how this interface can be included in both the
- implementation of the unit and in a program that uses that unit; this
- is done with the $INCLUDE metacommand for IBM Pascal. }
-
- BEGIN
- END;