Mercurial > projects > dstress

annotate complex/error_message/error_message_01_C.d @ 1630:d0efa3ae5522 default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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 fb70ca0d80ba
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
755
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
1 // $HeadURL$
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
2 // $Date$
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
3 // $Author$
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
4
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
5 // @author@ Don Clugston <dac@nospam.com.au>
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
6 // @date@ 2005-11-24
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
7 // @uri@ news:dm3rs0$2qit$1@digitaldaemon.com
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
8
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
9 module dstress.complex.error_message.error_message_01_C;
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
10
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
11 template a()
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
12 {
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
13 const real val= 0x1p9;
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
14 }
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
15
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
16 template half(alias f)
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
17 {
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
18 const real val = f.val/2;
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
19 }
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
20
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
21 template c(alias f)
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
22 {
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
23 static if (f.val > 2.0) const int val = c!( half!(f) ).val;
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
24 }
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
25
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
26 const int m = c!(a!()).val;
fb70ca0d80ba updated resutls of DMD-0.093 - 0.101, 0.104, 0.121, 0.140
thomask
parents:
diff changeset
27