annotate run/line_token_02.d @ 1597:8b9d4d2f925a

Fix typos in complex tests. See D bug 614.
author Christian Kamm <kamm incasoftware de>
date Tue, 09 Sep 2008 16:53:58 +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
9a121126b077 major "Torture" review
thomask
parents: 374
diff changeset
6
374
f87ba6507260 added missing meta-data
thomask
parents: 360
diff changeset
7 module dstress.run.line_token_02;
f87ba6507260 added missing meta-data
thomask
parents: 360
diff changeset
8
37
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
9 int main(){
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
10 try{
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
11 #line 0
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
12 assert(0);
374
f87ba6507260 added missing meta-data
thomask
parents: 360
diff changeset
13 }catch(Object e){
37
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
14 checkLineNumber(e);
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
15 return 0;
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
16 }
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
17
756
9a121126b077 major "Torture" review
thomask
parents: 374
diff changeset
18 assert(0);
37
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
19 }
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
20
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
21 /*
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
22 * @WARNING@: this code depends on the phobos implementation.
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
23 * char[]s returned by wrong assertions have to look like:
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
24 * "blah blah (linenumber) blah blah"
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
25 */
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
26 void checkLineNumber(Object o){
1560
36bedfa079e6 D1 -> D2 : 2/N
thomask
parents: 756
diff changeset
27 string x=o.toString();
37
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
28
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
29 int start;
1560
36bedfa079e6 D1 -> D2 : 2/N
thomask
parents: 756
diff changeset
30 for(start=0; start<x.length; start++){
36bedfa079e6 D1 -> D2 : 2/N
thomask
parents: 756
diff changeset
31 if(x[start]=='('){
37
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
32 break;
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
33 }
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
34 }
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
35
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
36 int end;
1560
36bedfa079e6 D1 -> D2 : 2/N
thomask
parents: 756
diff changeset
37 for(end=x.length-1; end>start; end--){
36bedfa079e6 D1 -> D2 : 2/N
thomask
parents: 756
diff changeset
38 if(x[end]==')'){
37
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
39 break;
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
40 }
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
41 }
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
42
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
43 assert(end-start==2);
1560
36bedfa079e6 D1 -> D2 : 2/N
thomask
parents: 756
diff changeset
44 assert(x[start+1]=='0');
37
4e88d22c699a added '#line integer "filespec"' tests
thomask
parents:
diff changeset
45 }