home *** CD-ROM | disk | FTP | other *** search
/ rtsi.com / 2014.01.www.rtsi.com.tar / www.rtsi.com / OS9 / OSK / TELECOM / UUCPbb_2_1_src.lzh / UUCPBB21 / nmload.c < prev    next >
Text File  |  1994-09-25  |  1KB  |  62 lines
  1. #ifndef _OSK
  2.  
  3. /* Our own versions of modlink() and modload() which use
  4.    F$NMLink and F$NMLoad to load a module  --BGP  */
  5.  
  6. #include <os9.h>
  7.  
  8. #define F_NMLINK  0x21
  9. #define F_NMLOAD  0x22
  10. #define F_UNLOAD  0x1d
  11.  
  12. extern int errno;
  13.  
  14.  
  15. int nmlink (mod, type, lang)
  16. char *mod;
  17. int type, lang;
  18. {
  19.      struct registers reg;
  20.      int result;
  21.      
  22.      reg.rg_a = type | lang;
  23.      reg.rg_x = mod;
  24.      result = _os9 (F_NMLINK, ®);
  25.      errno = reg.rg_b & 0xff;
  26.      return (result);
  27. }
  28.  
  29.  
  30.  
  31. int nmload (mod, type, lang)
  32. char *mod;
  33. int type, lang;
  34. {
  35.      struct registers reg;
  36.      int result;
  37.  
  38.      reg.rg_a = type | lang;
  39.      reg.rg_x = mod;
  40.      result = _os9 (F_NMLOAD, ®);
  41.      errno = reg.rg_b & 0xff;
  42.      return (result);
  43. }
  44.  
  45.  
  46. /* our own munload using F$UnLoad to unlink the module --REB */
  47.  
  48. int munload (mod, typelang)
  49. char *mod;
  50. int typelang;
  51. {
  52.      struct registers reg;
  53.      int result;
  54.  
  55.      reg.rg_a = typelang;
  56.      reg.rg_x = mod;
  57.      result = _os9 (F_UNLOAD, ®);
  58.      errno = reg.rg_b & 0xff;
  59.      return (result);
  60. }
  61. #endif
  62.