diff options
Diffstat (limited to 'Test/test21/Boxing.bpl')
-rw-r--r-- | Test/test21/Boxing.bpl | 52 |
1 files changed, 26 insertions, 26 deletions
diff --git a/Test/test21/Boxing.bpl b/Test/test21/Boxing.bpl index 0112b6cf..aa7c53b3 100644 --- a/Test/test21/Boxing.bpl +++ b/Test/test21/Boxing.bpl @@ -1,27 +1,27 @@ -// RUN: %boogie -typeEncoding:n -logPrefix:0n "%s" > "%t"
-// RUN: %diff "%s.n.expect" "%t"
-// RUN: %boogie -typeEncoding:p -logPrefix:0p "%s" > "%t"
-// RUN: %diff "%s.p.expect" "%t"
-// RUN: %boogie -typeEncoding:a -logPrefix:0a "%s" > "%t"
-// RUN: %diff "%s.a.expect" "%t"
-
-type Box;
-
-function box<a>(a) returns (Box);
-function unbox<a>(Box) returns (a);
-
-axiom (forall<a> x:a :: unbox(box(x)) == x);
-
-var b1: Box;
-var b2: Box;
-var b3: Box;
-
-procedure P() returns ()
- modifies b1, b2, b3; {
- b1 := box(13);
- b2 := box(true);
- b3 := box(b1);
-
- assert unbox(b1) == 13 && unbox(b2) == true && unbox(unbox(b3)) == 13;
- assert unbox(b1) == true; // error
+// RUN: %boogie -typeEncoding:n -logPrefix:0n "%s" > "%t" +// RUN: %diff "%s.n.expect" "%t" +// RUN: %boogie -typeEncoding:p -logPrefix:0p "%s" > "%t" +// RUN: %diff "%s.p.expect" "%t" +// RUN: %boogie -typeEncoding:a -logPrefix:0a "%s" > "%t" +// RUN: %diff "%s.a.expect" "%t" + +type Box; + +function box<a>(a) returns (Box); +function unbox<a>(Box) returns (a); + +axiom (forall<a> x:a :: unbox(box(x)) == x); + +var b1: Box; +var b2: Box; +var b3: Box; + +procedure P() returns () + modifies b1, b2, b3; { + b1 := box(13); + b2 := box(true); + b3 := box(b1); + + assert unbox(b1) == 13 && unbox(b2) == true && unbox(unbox(b3)) == 13; + assert unbox(b1) == true; // error }
\ No newline at end of file |