exile/v1/examples/spork.ck

   1 // this shows how to dynamically spork shreds...
   2
   3 fun void foo( string s )
   4 {
   5     while( true )
   6     {
   7         s => stdout;
   8         500::ms => now;
   9     }
  10 }
  11
  12 spork ~ foo( "you" );
  13 250::ms => now;
  14 spork ~ foo( "me" );
  15
  16
  17 // infinite time loop - children shreds leave with parent shred
  18 while( true )
  19     1::second => now;