Mercurial > projects > ldc

annotate tests/mini/foreach7.d @ 1215:08f87d8cd101

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix some unittests for 64-bit asm. They were operating on int variables as if they were longs. This was causing asm1_1 to fail when compiled with -O3 because it was overwriting the spilled value of callee-saved register %rbx, which the runtime was using as a pointer value at the time.
author Frits van Bommel <fvbommel wxs.nl>
date Mon, 13 Apr 2009 17:42:36 +0200
parents 1bb99290e03a
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
73
b706170e24a9 [svn r77] Fixed foreach on slice.
lindquist
parents:
diff changeset
1 module foreach7;
b706170e24a9 [svn r77] Fixed foreach on slice.
lindquist
parents:
diff changeset
2
b706170e24a9 [svn r77] Fixed foreach on slice.
lindquist
parents:
diff changeset
3 void main()
b706170e24a9 [svn r77] Fixed foreach on slice.
lindquist
parents:
diff changeset
4 {
b706170e24a9 [svn r77] Fixed foreach on slice.
lindquist
parents:
diff changeset
5 int[4] a = [1,2,3,4];
b706170e24a9 [svn r77] Fixed foreach on slice.
lindquist
parents:
diff changeset
6 int i;
b706170e24a9 [svn r77] Fixed foreach on slice.
lindquist
parents:
diff changeset
7 foreach(v; a[0..3])
b706170e24a9 [svn r77] Fixed foreach on slice.
lindquist
parents:
diff changeset
8 {
b706170e24a9 [svn r77] Fixed foreach on slice.
lindquist
parents:
diff changeset
9 i += v;
b706170e24a9 [svn r77] Fixed foreach on slice.
lindquist
parents:
diff changeset
10 }
b706170e24a9 [svn r77] Fixed foreach on slice.
lindquist
parents:
diff changeset
11 assert(i == 6);
b706170e24a9 [svn r77] Fixed foreach on slice.
lindquist
parents:
diff changeset
12 }