home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / TP_ADV.ZIP / LIST0810.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1989-07-31  |  656 b   |  26 lines
  1. Unit A;
  2. { This unit is another in the example to determine the order  }
  3. { of units within an OVR file.  It interfaces a single        }
  4. { procedure that is called from unit three.  This procedure,  }
  5. { like the others, should NEVER BE CALLED.                    }
  6.  
  7. {$O+,F+}
  8.  
  9. Interface
  10.  
  11. Procedure A1;
  12.  
  13. Implementation
  14.  
  15. Procedure A1;
  16. { This procedure MUST NEVER BE CALLED.  It is simply here to  }
  17. { determine the order of the units within the OVR file        }
  18. { produced when this unit is compiled as part of another      }
  19. { program.                                                    }
  20. Begin
  21.   INline( $90/$41/$90 );
  22. End;
  23.  
  24. End.
  25.  
  26.