diff options
Diffstat (limited to 'Test/test21/Coercions2.bpl')
-rw-r--r-- | Test/test21/Coercions2.bpl | 58 |
1 files changed, 29 insertions, 29 deletions
diff --git a/Test/test21/Coercions2.bpl b/Test/test21/Coercions2.bpl index e9a78574..a52fb0e6 100644 --- a/Test/test21/Coercions2.bpl +++ b/Test/test21/Coercions2.bpl @@ -1,30 +1,30 @@ -// 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, C;
-
-function box<a>(a) returns (Box);
-function unbox<a>(Box) returns (a);
-
-axiom (forall<a> x:a :: unbox(box(x)) == x);
-
-axiom (forall<a> x:Box :: {unbox(x):a} box(unbox(x):a) == x);
-
-axiom (forall x:Box :: box(unbox(x)) == x); // warning
-
-procedure P() {
- var b : Box;
- var i : C;
-
- assert unbox(box(13)) == 13;
-
- i := unbox(b);
- assert b == box(i);
-
- assert false;
+// 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, C; + +function box<a>(a) returns (Box); +function unbox<a>(Box) returns (a); + +axiom (forall<a> x:a :: unbox(box(x)) == x); + +axiom (forall<a> x:Box :: {unbox(x):a} box(unbox(x):a) == x); + +axiom (forall x:Box :: box(unbox(x)) == x); // warning + +procedure P() { + var b : Box; + var i : C; + + assert unbox(box(13)) == 13; + + i := unbox(b); + assert b == box(i); + + assert false; }
\ No newline at end of file |