home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / E / TFF-A32R.LZX / AmigaE3.2a / Src / Tools / Arexx / arexxtest.e < prev    next >
Encoding:
Text File  |  1992-09-02  |  228 b   |  12 lines
  1. -> test arexx module, the easy way out
  2.  
  3. MODULE 'tools/arexx'
  4.  
  5. PROC main()
  6.   rx_HandleAll({process},'AREXXTESTPORT')
  7. ENDPROC
  8.  
  9. PROC process(s)
  10.   WriteF('Received message "\s" from Arexx!\n',s)
  11. ENDPROC StrCmp(s,'quit'),0,'result!'
  12.