blob: d903cc74945c33078868987e6a540b16284a5822 [file] [log] [blame]
package Spark1 is
Mailbox : Integer with Atomic, Async_Writers, Async_Readers;
task Worker
with Global => (Input => Mailbox);
end;