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