changed type checking of yield procedures so that they can only call other yielding procedures

1 files changed, 1 insertions, 1 deletions

diff --git a/Test/og/parallel2.bpl b/Test/og/parallel2.bpl
index 4f2cbd5b..ad40ffa0 100644
--- a/Test/og/parallel2.bpl
+++ b/Test/og/parallel2.bpl
@@ -8,7 +8,7 @@ function {:inline} {:linear "tid"} TidCollector(x: int) : [int]bool
   MapConstBool(false)[x := true]

 }

 

-procedure Allocate() returns ({:linear "tid"} xls: int);

+procedure {:yields} {:layer 1} Allocate() returns ({:linear "tid"} xls: int);

 

 procedure {:yields} {:layer 0,1} Write(idx: int, val: int);

 ensures {:atomic} |{A: a[idx] := val; return true; }|;