From f3f704edfb2cd1021d811050c72694767710217f Mon Sep 17 00:00:00 2001 From: Checkmate50 Date: Tue, 19 Jul 2016 11:14:41 -0600 Subject: Added and briefly tested the updated syntax. NaN/oo not supported yet --- Test/floats/float0.bpl | 8 ++++---- Test/floats/float1.bpl | 24 ++++++++++++------------ 2 files changed, 16 insertions(+), 16 deletions(-) (limited to 'Test/floats') diff --git a/Test/floats/float0.bpl b/Test/floats/float0.bpl index 1a642835..d7faa4b0 100644 --- a/Test/floats/float0.bpl +++ b/Test/floats/float0.bpl @@ -4,11 +4,11 @@ procedure foo(x : real) returns (r : float8e24) { r := 15; // Error r := 15.0; // Error - r := fp(false, 1bv8, 0bv22); // Error - r := fp<8, 23>(1bv31); // Error + r := 0e1f22e8; // Error + r := 1e0f23e8; // Error r := x; // Error - r := fp<8, 23>(1bv31) + fp<8, 23>(1bv31); // Error - r := fp<8, 24>(1bv32) + fp<8, 23>(1bv31); // Error + r := 1e0f23e8 + 1e0f23e8; // Error + r := 1e0f24e8 + 1e0f23e8; // Error return; } \ No newline at end of file diff --git a/Test/floats/float1.bpl b/Test/floats/float1.bpl index 9ed62579..2b901c94 100644 --- a/Test/floats/float1.bpl +++ b/Test/floats/float1.bpl @@ -1,13 +1,13 @@ -// RUN: %boogie -proverWarnings:1 "%s" > "%t" -// RUN: %diff "%s.expect" "%t" -procedure foo(x : float<8, 24>) returns (r : float<8, 24>) -{ - r := fp(false, 1bv8, 0bv23); - r := fp<8, 24>(1bv32); - r := x; - r := x + fp<8, 24>(1bv32); - r := fp<8, 24>(1bv32) + fp<8, 24>(1bv32); - assert(r == fp<8, 24>(2bv32)); - - return; +// RUN: %boogie -proverWarnings:1 "%s" > "%t" +// RUN: %diff "%s.expect" "%t" +procedure foo(x : float24e8) returns (r : float24e8) +{ + r := 0e1f24e8; + r := 1e0f24e8; + r := x; + r := x + 1e0f24e8; + r := 0e0f24e8 + 0e0f24e8; + assert(r == 0e1f24e8); + + return; } \ No newline at end of file -- cgit v1.2.3