blob: b1e46ae460c496bf275a7d4efaf8305f0e9cfc1b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
// RUN: %boogie -proverWarnings:1 "%s" > "%t"
// RUN: %diff "%s.expect" "%t"
function {:builtin "(_ to_fp 8 24) RNE"} TO_FLOAT32_INT(int) returns (float24e8);
function {:builtin "(_ to_fp 8 24) RNE"} TO_FLOAT32_REAL(real) returns (float24e8);
procedure main() returns () {
var x : float24e8;
var y : float24e8;
var z : float24e8;
var r : float24e8;
x := TO_FLOAT32_REAL(1e7);
y := x + TO_FLOAT32_INT(1);
z := x - TO_FLOAT32_INT(1);
r := y - z;
assert r == TO_FLOAT32_INT(2);
}
|
