diff options
author | Checkmate50 <dgeisler50@gmail.com> | 2016-01-04 19:26:36 -0800 |
---|---|---|
committer | Checkmate50 <dgeisler50@gmail.com> | 2016-01-04 19:26:36 -0800 |
commit | 6fad4313b1a4e7f8e6cfcd12b92126a3d9ad58d0 (patch) | |
tree | 7404eda3568a7f271ea2827f8e1603c139c5b452 /float_test3.bpl | |
parent | a1c9e11736bda4bf8ea4bf431523b9b975b01670 (diff) |
Added several test cases and some basic documentation for fp usage
Diffstat (limited to 'float_test3.bpl')
-rw-r--r-- | float_test3.bpl | 14 |
1 files changed, 12 insertions, 2 deletions
diff --git a/float_test3.bpl b/float_test3.bpl index e93e7df7..dd0c1ba4 100644 --- a/float_test3.bpl +++ b/float_test3.bpl @@ -1,3 +1,13 @@ - procedure F() returns () { - assert fp(5) == fp(5 8 23); +//Translation from addsub_float_inexact.c +//Should give an error +procedure main() returns () { + var x : float; + var y : float; + var z : float; + var r : float; + x := fp(10000000); + y := x + fp(1); + z := x - fp(1); + r := y - z; + assert r == fp(0); }
\ No newline at end of file |