home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / TP_ADV.ZIP / LIST0403.C < prev    next >
Encoding:
C/C++ Source or Header  |  1989-07-31  |  355 b   |  14 lines
  1. /* C module that will place a call to a procedure defined in */
  2. /* the Turbo Pascal program that links in this module.       */
  3.  
  4. extern void PasProc (void);
  5. /* External Pascal procedure that is called by this C module */
  6.  
  7. void pascal StartUpC (void)
  8. {
  9.   register int counter;
  10.   for (counter = 1; counter <= 15; counter++ )
  11.     PasProc();
  12. }
  13.  
  14.