summaryrefslogtreecommitdiff
path: root/float_test14.bpl
diff options
context:
space:
mode:
authorGravatar Checkmate50 <dgeisler50@gmail.com>2016-05-31 12:08:07 -0600
committerGravatar Checkmate50 <dgeisler50@gmail.com>2016-05-31 12:08:07 -0600
commit6f7fc01346c0ebe9072e61ace2cfede4fcedea09 (patch)
tree6d55790d0180d5e8cf1a79ea03ad6ce3b2019f17 /float_test14.bpl
parent51b7e8146f413b83a412572fcc9e3a1a8b302b79 (diff)
Initial round of testing works with new syntax. Fixed an error where floating points could not be given as a function argument
Diffstat (limited to 'float_test14.bpl')
-rw-r--r--float_test14.bpl19
1 files changed, 11 insertions, 8 deletions
diff --git a/float_test14.bpl b/float_test14.bpl
index 9b5dab0a..1505c361 100644
--- a/float_test14.bpl
+++ b/float_test14.bpl
@@ -1,17 +1,20 @@
-//Translation from inv_square_false-unreach-call.c
+//Translation from inv_square_true-unreach-call.c
//Should Verify
+function {:builtin "(_ to_fp 8 24) RNE"} TO_FLOAT32_INT(int) returns (float32);
+function {:builtin "(_ to_fp 8 24) RNE"} TO_FLOAT32_REAL(real) returns (float32);
+
procedure main() returns () {
- var x : float;
- var y : float;
- var z : float;
+ var x : float32;
+ var y : float32;
+ var z : float32;
havoc x;
- assume(x >= fp(-1) && x <= fp(1));
+ assume(x >= TO_FLOAT32_INT(-1) && x <= TO_FLOAT32_INT(1));
- if (x <= fp(-.00000000000000000001) || x >= fp(.00000000000000000001)) {
+ if (x <= TO_FLOAT32_REAL(-1e-20) || x >= TO_FLOAT32_REAL(1e-20)) {
y := x * x;
- assert(y != fp(0));
- z := fp(1) / y;
+ assert(y != TO_FLOAT32_INT(0));
+ z := TO_FLOAT32_INT(1) / y;
}
} \ No newline at end of file