annotate run/ieee_754_zerocomp_04.d @ 1630:d0efa3ae5522 default tip

run/mini/naked_asm5: New x86_64 ABI passes the arguments in reverse order.
author David Nadlinger <code@klickverbot.at>
date Sat, 23 Apr 2011 22:57:32 +0200
parents e720ce827c1c
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
496
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
1 // $HeadURL$
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
2 // $Date$
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
3 // $Author$
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
4
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
5 module dstress.run.ieee_754_zerocomp_04;
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
6
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
7 int main(){
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
8 double f1, f2;
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
9
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
10 f1=0.0;
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
11 f2=-f1;
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
12 assert(f1==f2);
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
13
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
14 f1=-0.0;
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
15 f2=-f1;
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
16 assert(f1==f2);
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
17
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
18 return 0;
e720ce827c1c added IEEE 754 tests for 0-handing
thomask
parents:
diff changeset
19 }