home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / icon / dos / src / runtime / extcall.r < prev    next >
Encoding:
Text File  |  1992-02-10  |  432 b   |  23 lines
  1. /*
  2.  * extcall.r
  3.  */
  4. #if !COMPILER
  5. #ifdef ExternalFunctions
  6.  
  7. /*
  8.  * extcall - stub procedure for external call interface.
  9.  */
  10. dptr extcall(dargv, argc, ip)
  11. dptr dargv;
  12. int argc;
  13. int *ip;
  14.    {
  15.    *ip = 216;            /* no external function to find */
  16.    return (dptr)NULL;
  17.    }
  18.  
  19. #else                    /* ExternalFunctions */
  20. static char x;            /* prevent empty module */
  21. #endif                     /* ExternalFunctions */
  22. #endif                    /* !COMPILER */
  23.