diff --git a/testcases/time-mul.occ b/testcases/time-mul.occ index a730d02..398a602 100644 --- a/testcases/time-mul.occ +++ b/testcases/time-mul.occ @@ -2,37 +2,48 @@ PROC main(CHAN OF BYTE out) TIMER t: - INT t0, t1, x: + INT t0, t1, x, y: SEQ t ? t0 - SEQ i = 0 FOR 100000 - x := i * 5 + SEQ i = 0 FOR 1000000 + SEQ + x := i * 5 + y := y PLUS x t ? t1 t1 := t1 - t0 out.string("Time for low numbers MUL: ", 0, out) out.int(t1, 0, out) t ? t0 - SEQ i = 0 FOR 100000 - x := i TIMES 5 + SEQ i = 0 FOR 1000000 + SEQ + x := i TIMES 5 + y := y PLUS x t ? t1 t1 := t1 - t0 out.string("Time for low numbers TIMES: ", 0, out) out.int(t1, 0, out) t ? t0 - SEQ i = 100000000 FOR 100000 - x := i * 5 + SEQ i = 100000000 FOR 1000000 + SEQ + x := i * 5 + y := y PLUS x t ? t1 t1 := t1 - t0 out.string("Time for high numbers MUL: ", 0, out) out.int(t1, 0, out) t ? t0 - SEQ i = 100000000 FOR 100000 - x := i TIMES 5 + SEQ i = 100000000 FOR 1000000 + SEQ + x := i TIMES 5 + y := y PLUS x t ? t1 t1 := t1 - t0 out.string("Time for high numbers TIMES: ", 0, out) out.int(t1, 0, out) + + out ! '*n' + out.int(y, 0, out) :