SimpleConcurrentProcesses: obj
%requires LIB.BasicSystem,LIB.Containers.QueueLib
%Public
System: LIB.BasicSystem.BasicSystem
%Public
Process: Basicprocess
%globals #Process,immutable,SQS,console
%interface entry
%Public
start::
Q: obj LIB.Containers.QueueLib.Queue
L: obj Lock
isStopping: var Boolean
entry:
%arguments immutable,unique
pendingMethods:
out res: var Boolean
exeNext:
E: ref entry
Loop: obj
stop:< entry