Added a few more parallel usage tests

This commit is contained in:
Neil Brown 2008-02-02 18:59:20 +00:00
parent 0800fc7b87
commit 9c0dcb6008

View File

@ -122,4 +122,21 @@ PROC m()
PAR i = 1 FOR x
a[i] := 4
%PASS Branch inside parallel
IF
x < 0
y := 0
TRUE
y := 2
%PASS PAR inside branch inside parallel
IF
x < 0
PAR
x := 3
y := 4
TRUE
PAR
x := 2
y := 3
%