summaryrefslogtreecommitdiff
path: root/Test/floats/float1.bpl
blob: 9ed62579fc06fb0642d4f94e0266b8e3eeda37a6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
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;
}