Robust/src/Benchmarks/Scheduling/JGFSeries/JGFSeriesBench.java

   1 /** Bristlecone Version  **/
   2
   3 /**************************************************************************
   4 *                                                                         *
   5 *         Java Grande Forum Benchmark Suite - Thread Version 1.0          *
   6 *                                                                         *
   7 *                            produced by                                  *
   8 *                                                                         *
   9 *                  Java Grande Benchmarking Project                       *
  10 *                                                                         *
  11 *                                at                                       *
  12 *                                                                         *
  13 *                Edinburgh Parallel Computing Centre                      *
  14 *                                                                         *
  15 *                email: epcc-javagrande@epcc.ed.ac.uk                     *
  16 *                                                                         *
  17 *                                                                         *
  18 *      This version copyright (c) The University of Edinburgh, 2001.      *
  19 *                         All rights reserved.                            *
  20 *                                                                         *
  21 **************************************************************************/
  22
  23 task t1(StartupObject s{initialstate}) {
  24     //System.printString("task t1\n");
  25
  26     int datasize = 16;
  27     for(int i = 0; i < datasize; ++i) {
  28         SeriesRunner sr = new SeriesRunner(i){!finish};
  29     }
  30
  31     taskexit(s{!initialstate});
  32 }
  33
  34 task t2(SeriesRunner sr{!finish}) {
  35     //System.printString("task t2\n");
  36     sr.run();
  37     taskexit(sr{finish});
  38 }