home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 5 / FreshFish_July-August1994.bin / bbs / util / mg-3b.lha / mg-3b / REXX / buffers.mg < prev    next >
Encoding:
Text File  |  1990-06-02  |  249 b   |  13 lines
  1. /* Exercise the rexx-buffer-list command */
  2.  
  3. options failat 2
  4.  
  5. 'rexx-buffer-list' buffers
  6.  
  7. 'rexx-insert "We got' buffers.0 'buffers\n"'
  8.  
  9. do i = 1 to buffers.0
  10.     'rexx-insert "' buffers.i.name 'file:' buffers.i.file buffers.i.status '\n"'
  11.     end
  12. exit 0
  13.