Change pingpong (set limit when benchmark done)

Author: Wonseo-C

TS/Savina/src/micro/PingPong.lf

@@ -3,17 +3,19 @@
 target TypeScript {
     fast: true
 };
+
+import BenchmarkRunner from "../BenchmarkRunner.lf";
+
 reactor Ping(limit:number(100000)) {
     input receive:number;
+    input start;
     output send:number;
     state pingsLeft:number(limit);
-    state startTime:time;
     logical action serve;
-    logical action done;
-    reaction (startup) -> send {=
+    output done: boolean;
+    reaction (start) -> send {=
         send = pingsLeft;
         pingsLeft -= 1;
-        startTime = util.getCurrentPhysicalTime();
     =}
     reaction (serve) -> send {= 
         send = pingsLeft;
@@ -23,25 +25,25 @@ reactor Ping(limit:number(100000)) {
         if (pingsLeft > 0) {
             actions.serve.schedule(0, null);
         } else {
-            actions.done.schedule(0, null);
+            pingsLeft = limit;
+            done = true;
         }
     =}
-    reaction (done) {=
-        let elapsedTime = util.getCurrentPhysicalTime().subtract(startTime as TimeValue);
-        console.log("Elapsed time: " + elapsedTime);
-        util.requestStop();
-    =}
 }
 reactor Pong {
     input receive:number;
     output send:number;
     reaction (receive) -> send {=
-        send = receive as number;   
+        send = receive as number;
     =}
 }
-main reactor PingPong(limit:number(100000)) {
+main reactor PingPong(numIterations:number(12), limit:number(100000)) {
+    runner = new BenchmarkRunner(numIterations = numIterations);
     ping = new Ping(limit = limit);
     pong = new Pong();
+    
+    runner.start -> ping.start;
     ping.send -> pong.receive;
-    pong.send -> ping.receive; 
+    pong.send -> ping.receive;
+    ping.done -> runner.finish;
 }