home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / TP_ADV.ZIP / LIST0807.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1989-07-31  |  465 b   |  22 lines
  1. Unit One;
  2. { First unit in the example program.  Does not depend on any  }
  3. { other unit.                                                 }
  4.  
  5. {$O+,F+}
  6.  
  7. Interface
  8.  
  9. Procedure One1;
  10.  
  11. Implementation
  12.  
  13. Procedure One1;
  14. { Do-Nothing procedure that should NEVER BE EXECUTED!  Its    }
  15. { only purpose is to determine the order of the units within  }
  16. { the OVR file produced by Turbo Pascal.                      }
  17. Begin
  18.   Inline( $90/$01/$90 );
  19. End;
  20.  
  21. End.
  22.