home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 22 gnu / 22-gnu.zip / rcs567s.zip / rcs / src / ms / libinit.c < prev    next >
C/C++ Source or Header  |  1994-07-04  |  578b  |  35 lines

  1. /* libinit.c
  2.  *
  3.  * Author:  Kai Uwe Rommel <rommel@jonas>
  4.  * Created: Sat Jan 01 1994
  5.  */
  6.  
  7. extern char cmdid[];
  8. extern exiterr();
  9.  
  10. #ifdef main
  11. #undef main
  12. #endif
  13.  
  14. main(int argc, char **argv)
  15. {
  16.   /* Before actually starting the RCS programs, additional
  17.    * startup code can be executed here, such as for command
  18.    * line expansion.
  19.    */
  20.  
  21. #ifdef __EMX__
  22.   _response(&argc, &argv);
  23.   _wildcard(&argc, &argv);
  24.   _emxload_env("RCSLOAD");
  25. #endif
  26.  
  27. #ifdef DLLINIT
  28.   dllmain(cmdid, exiterr);
  29. #endif
  30.  
  31.   rcsmain(argc, argv);
  32. }
  33.  
  34. /* end of libinit.c */
  35.