home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 19 / AACD19.BIN / AACD / Programming / YAEC / testsrc / ipc_test.e < prev    next >
Encoding:
Text File  |  2001-02-23  |  206 b   |  11 lines
  1. MODULE 'test/ipc'
  2.  
  3. PROC main()
  4.    DEF nm:newMsg, np:newPort
  5.    IF np.newPort('hejhej', NIL) = NIL THEN Raise("PORT")
  6.    ->IF nm.reply = NIL THEN Raise("BLA")
  7.    ->PrintF('\s\n', arg)
  8.    Delay(500)
  9. ENDPROC
  10.  
  11.