annotate run/sort_15.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 6e4063f99377
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
297
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
1 // $HeadURL$
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
2 // $Date$
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
3 // $Author$
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
4
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
5 // @author@ zwang <nehzgnaw@gmail.com>
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
6 // @date@ 2005-02-19
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
7 // @uri@ news:cv7gn5$2irj$1@digitaldaemon.com
1487
6e4063f99377 changed nntp: URLs to http: URLs
thomask
parents: 1383
diff changeset
8 // @uri@ http://www.digitalmars.com/pnews/read.php?server=news.digitalmars.com&group=digitalmars.D.bugs&artnum=3022
297
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
9
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
10 module dstress.run.sort_15;
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
11
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
12 int main(){
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
13 idouble[] array;
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
14 array.length=10;
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
15 array[0]=idouble.max;
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
16 array[1]=0.875i;
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
17 array[2]=0.75i;
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
18 array[3]=0.625i;
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
19 array[4]=0.5i;
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
20 array[5]=0.375i;
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
21 array[6]=0.25i;
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
22 array[7]=0.125i;
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
23 array[8]=0.0i;
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
24 array[9]=idouble.min;
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
25
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
26 idouble[] sorted_copy = array.sort;
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
27
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
28 assert(array.length==10);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
29 assert(array[0]==0.0i);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
30 assert(array[1]==idouble.min);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
31 assert(array[2]==0.125i);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
32 assert(array[3]==0.25i);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
33 assert(array[4]==0.375i);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
34 assert(array[5]==0.5i);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
35 assert(array[6]==0.625i);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
36 assert(array[7]==0.75i);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
37 assert(array[8]==0.875i);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
38 assert(array[9]==idouble.max);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
39
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
40 assert(sorted_copy.length==10);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
41 assert(sorted_copy[0]==0.0i);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
42 assert(sorted_copy[1]==idouble.min);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
43 assert(sorted_copy[2]==0.125i);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
44 assert(sorted_copy[3]==0.25i);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
45 assert(sorted_copy[4]==0.375i);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
46 assert(sorted_copy[5]==0.5i);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
47 assert(sorted_copy[6]==0.625i);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
48 assert(sorted_copy[7]==0.75i);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
49 assert(sorted_copy[8]==0.875i);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
50 assert(sorted_copy[9]==idouble.max);
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
51
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
52 return 0;
dc5c9509a605 sort ifloat/ireal/idouble
thomask
parents:
diff changeset
53 }