annotate run/line_ending_dos.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 36bedfa079e6
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
374
f87ba6507260 added missing meta-data
thomask
parents: 360
diff changeset
1 // $HeadURL$
f87ba6507260 added missing meta-data
thomask
parents: 360
diff changeset
2 // $Date$
f87ba6507260 added missing meta-data
thomask
parents: 360
diff changeset
3 // $Author$
f87ba6507260 added missing meta-data
thomask
parents: 360
diff changeset
4
756
9a121126b077 major "Torture" review
thomask
parents: 374
diff changeset
5 // __DSTRESS_TORTURE_BLOCK__ -release
374
f87ba6507260 added missing meta-data
thomask
parents: 360
diff changeset
6 module dstress.run.line_ending_dos;
11
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
7 int main(){
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
8 try{
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
9 assert(0);
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
10 }catch(Exception e){
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
11 checkLineNumber(e);
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
12 return 0;
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
13 }
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
14
756
9a121126b077 major "Torture" review
thomask
parents: 374
diff changeset
15 assert(0);
11
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
16 }
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
17
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
18 /*
111
24da167d3f07 svn maintenance
thomask
parents: 11
diff changeset
19 * @WARNING@ this code depends on the phobos implementation.
11
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
20 * char[]s returned by wrong assertions have to look like:
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
21 * "blah blah (linenumber) blah blah"
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
22 */
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
23 void checkLineNumber(Object o){
1560
36bedfa079e6 D1 -> D2 : 2/N
thomask
parents: 756
diff changeset
24 string msg=o.toString();
11
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
25
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
26 int start;
1560
36bedfa079e6 D1 -> D2 : 2/N
thomask
parents: 756
diff changeset
27 for(start=0; start<msg.length; start++){
36bedfa079e6 D1 -> D2 : 2/N
thomask
parents: 756
diff changeset
28 if(msg[start]=='('){
11
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
29 break;
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
30 }
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
31 }
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
32
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
33 int end;
1560
36bedfa079e6 D1 -> D2 : 2/N
thomask
parents: 756
diff changeset
34 for(end=msg.length-1; end>start; end--){
36bedfa079e6 D1 -> D2 : 2/N
thomask
parents: 756
diff changeset
35 if(msg[end]==')'){
11
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
36 break;
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
37 }
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
38 }
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
39
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
40 assert(end-start==2);
1560
36bedfa079e6 D1 -> D2 : 2/N
thomask
parents: 756
diff changeset
41 assert(msg[start+1]=='9');
11
26b8c49918fe added line ending tests
unknown
parents:
diff changeset
42 }