blob: dd0c1ba416405efd757ada6a8b35074ea791dd55 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
//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);
}
|