blob: 0f60dcd062bcc06658567debd54eb3c1b7affac8 (
plain) (
blame)
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
32
33
34
35
36
37
|
// f32: single precision values and packed arrays of them
struct vec3 { f32 x, y, z; };
f32 gsum;
fn put_f(x) { asm { x @ #1220 } return 0; }
[8]f32 gbuf;
f32 half(f32 v) { return v / 2; }
fn main() {
gsum = 0.1;
f32 a = 16777216.0;
f32 b = a + 1.0; // rounds back to 16777216 in single precision
float c = 16777216.0 + 1.0;
f32 t = 0.1;
float u = 0.1;
put_f(b); put_c(' '); put_f(c); put_c(' ');
put_n(t == 0.1); put_n(t == u); put_n(t == (f32)u); put_c(' ');
put_f(half(3.0)); put_c(' ');
put_f(gsum * 10); put_c(' '); // 1.000000 (0.1f * 10 in double)
vec3 v; v.x = 1.5; v.y = 0.1; v.z = 2;
put_f(v.x + v.y + v.z); put_c(' ');
int i = 0;
gbuf[0] = 0.1; put_n(gbuf[0] == t); put_n(gbuf[0] == u); put_c(' ');
while (i < 8) { gbuf[i] = i * 0.25 + 0.1; i++; }
float s = 0;
i = 0;
while (i < 8) { s += gbuf[i]; i++; }
put_f(s); put_c(' ');
f32* p = new(f32, 100);
i = 0;
while (i < 100) { p[i] = i; i++; }
s = 0; i = 0;
while (i < 100) { s += p[i]; i++; }
put_f(s); put_c(' ');
put_n(sizeof(gbuf)); put_n(sizeof([100]f32)); put_c(10);
free(d*p);
}
|
