home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 310.lha / rexxserdev.library_v1.08 / loadit.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1980-12-05  |  592 b   |  26 lines

  1. /* */
  2.  
  3. /* open the Rexx support library */
  4.  
  5. if ~show('L',"rexxsupport.library") then do
  6.    if addlib('rexxsupport.library',0,-30,0) then
  7.       say 'added rexxsupport.library'
  8.    else do;
  9.       say 'support library not available'
  10.       exit 10
  11.       end
  12.    end
  13.  
  14. if ~show( 'L', "rexxserdev.library" ) then do
  15.    if addlib( 'rexxserdev.library', 0, -30, 0 ) then
  16.       say 'added rexxserdev.library'
  17.    else do;
  18.       say 'support library not available'
  19.       exit 10
  20.       end
  21.    end
  22.  
  23. libaddr = serlibbase()
  24. say 'serial library base =' libaddr
  25. /***************** ShoList.rexx ****************/
  26.