Mercurial > projects > ldc

annotate tests/mini/bug73.d @ 1613:8f50a13d09a0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge DMD r286: remove dead code --- dmd/interpret.c | 49 ++----------------------------------------------- dmd/mars.c | 2 +- 2 files changed, 3 insertions(+), 48 deletions(-)
author Leandro Lucarella <llucax@gmail.com>
date Wed, 06 Jan 2010 15:18:21 -0300
parents 1bb99290e03a
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
108
288fe1029e1f [svn r112] Fixed 'case 1,2,3:' style case statements.
lindquist
parents:
diff changeset
1 int find(char[] s, dchar c)
288fe1029e1f [svn r112] Fixed 'case 1,2,3:' style case statements.
lindquist
parents:
diff changeset
2 {
288fe1029e1f [svn r112] Fixed 'case 1,2,3:' style case statements.
lindquist
parents:
diff changeset
3 // c is a universal character
288fe1029e1f [svn r112] Fixed 'case 1,2,3:' style case statements.
lindquist
parents:
diff changeset
4 foreach (int i, dchar c2; s)
288fe1029e1f [svn r112] Fixed 'case 1,2,3:' style case statements.
lindquist
parents:
diff changeset
5 {
288fe1029e1f [svn r112] Fixed 'case 1,2,3:' style case statements.
lindquist
parents:
diff changeset
6 if (c == c2)
288fe1029e1f [svn r112] Fixed 'case 1,2,3:' style case statements.
lindquist
parents:
diff changeset
7 return i;
288fe1029e1f [svn r112] Fixed 'case 1,2,3:' style case statements.
lindquist
parents:
diff changeset
8 }
288fe1029e1f [svn r112] Fixed 'case 1,2,3:' style case statements.
lindquist
parents:
diff changeset
9 return -1;
288fe1029e1f [svn r112] Fixed 'case 1,2,3:' style case statements.
lindquist
parents:
diff changeset
10 }
288fe1029e1f [svn r112] Fixed 'case 1,2,3:' style case statements.
lindquist
parents:
diff changeset
11
288fe1029e1f [svn r112] Fixed 'case 1,2,3:' style case statements.
lindquist
parents:
diff changeset
12 void main()
288fe1029e1f [svn r112] Fixed 'case 1,2,3:' style case statements.
lindquist
parents:
diff changeset
13 {
129
8096ba7082db [svn r133] Fixed some problems with inlining not happening :P
lindquist
parents: 108
diff changeset
14 char[] hello = "hello world";
8096ba7082db [svn r133] Fixed some problems with inlining not happening :P
lindquist
parents: 108
diff changeset
15 int i = find(hello, 'w');
8096ba7082db [svn r133] Fixed some problems with inlining not happening :P
lindquist
parents: 108
diff changeset
16 assert(i == 6);
8096ba7082db [svn r133] Fixed some problems with inlining not happening :P
lindquist
parents: 108
diff changeset
17 i = find(hello, 'z');
8096ba7082db [svn r133] Fixed some problems with inlining not happening :P
lindquist
parents: 108
diff changeset
18 assert(i == -1);
8096ba7082db [svn r133] Fixed some problems with inlining not happening :P
lindquist
parents: 108
diff changeset
19 }