From d652155ae013f36a1ee17653a8e458baad2d9c2c Mon Sep 17 00:00:00 2001 From: Checkmate50 Date: Mon, 6 Jun 2016 23:14:18 -0600 Subject: Merging complete. Everything looks good *crosses fingers* --- Test/AbsHoudini/houd5.bpl | 62 +++++++++++++++++++++++------------------------ 1 file changed, 31 insertions(+), 31 deletions(-) (limited to 'Test/AbsHoudini/houd5.bpl') diff --git a/Test/AbsHoudini/houd5.bpl b/Test/AbsHoudini/houd5.bpl index 9a4c274b..71045f23 100644 --- a/Test/AbsHoudini/houd5.bpl +++ b/Test/AbsHoudini/houd5.bpl @@ -1,31 +1,31 @@ -// RUN: %boogie -noinfer -contractInfer -printAssignment -abstractHoudini:IA[ConstantProp] "%s" > "%t" -// RUN: %diff "%s.expect" "%t" -function {:existential true} b1(x:bool):bool; -function {:existential true} b2(x:bool):bool; -function {:existential true} b3(x:bool):bool; -function {:existential true} b4(x:bool):bool; -function {:existential true} b5():bool; -function {:existential true} Assert():bool; - -var array:[int]int; - -procedure foo (i:int) -requires b1(i == 0); -requires b2(i > 0); -requires b3(i < 0); -ensures b4(array[i] > 0); -modifies array; -ensures Assert() || (forall x:int :: {array[x]} x == i || array[x] == old(array)[x]); -{ - array[i] := 2 * i; -} - -procedure bar (j:int) returns (result:int) -requires b5() || (j > 0); -modifies array; -{ - call foo(j); - result := array[j]; -} - -// expected assigment: assert = false, b1(x) = !x, b2(x) = x, b3(x) = !x, b4(x) = x, b5() = false +// RUN: %boogie -noinfer -contractInfer -printAssignment -abstractHoudini:IA[ConstantProp] "%s" > "%t" +// RUN: %diff "%s.expect" "%t" +function {:existential true} b1(x:bool):bool; +function {:existential true} b2(x:bool):bool; +function {:existential true} b3(x:bool):bool; +function {:existential true} b4(x:bool):bool; +function {:existential true} b5():bool; +function {:existential true} Assert():bool; + +var array:[int]int; + +procedure foo (i:int) +requires b1(i == 0); +requires b2(i > 0); +requires b3(i < 0); +ensures b4(array[i] > 0); +modifies array; +ensures Assert() || (forall x:int :: {array[x]} x == i || array[x] == old(array)[x]); +{ + array[i] := 2 * i; +} + +procedure bar (j:int) returns (result:int) +requires b5() || (j > 0); +modifies array; +{ + call foo(j); + result := array[j]; +} + +// expected assigment: assert = false, b1(x) = !x, b2(x) = x, b3(x) = !x, b4(x) = x, b5() = false -- cgit v1.2.3