[go: up one dir, main page]

File: s-exp-float.c

package info (click to toggle)
uftrace 0.13-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm
  • size: 5,212 kB
  • sloc: ansic: 53,313; python: 9,846; makefile: 838; asm: 703; cpp: 602; sh: 560; javascript: 191
file content (31 lines) | stat: -rw-r--r-- 422 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
 
float float_add(float a, float b)
{
	return a + b;
}

float float_sub(float a, double b)
{
	return a - b;
}

double float_mul(double a, float b)
{
	return a * b;
}

double float_div(double a, double b)
{
	return a / b;
}

int main(int argc, char *argv[])
{
	double a, b, c, d;

	a = float_add(-0.1, 0.2);
	b = float_sub(0.1, 0.2);
	c = float_mul(300, 400);
	d = float_div(4e10, -0.02);

	return (a + b + c + d) ? 0 : 1;
}