In case you need to run several commands, you may need distinct queues for
each execution.
Example :
queue1 = .SystemQueue~run("dir c:\")
say "queue" queue1 "of type" queue1~class
queue2 = .SystemQueue~run("dir c:\w*")
say "queue" queue1 "of type" queue1~class
say "----------"
do 5
say "queue1:" queue1~pull
say "queue2:" queue2~pull
end
say "---------- queue1"
do line over queue1 ; say line ; end
say "---------- queue2"
do line over queue2 ; say line ; end
::class SystemQueue subclass RexxQueue
::method "run" class
use strict arg command
queue = self~new(self~create)
command '| rxqueue "'queue~get'"'
return queue
::method uninit
say "delete" self~get
self~delete
------------------------------------------------------------------------------
Special Offer -- Download ArcSight Logger for FREE!
Finally, a world-class log management solution at an even better
price-free! And you'll get a free "Love Thy Logs" t-shirt when you
download Logger. Secure your free ArcSight Logger TODAY!
http://p.sf.net/sfu/arcsisghtdev2dev
_______________________________________________
Oorexx-users mailing list
Oorexx-users@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/oorexx-users
