Mercurial > projects > ldc

annotate test/classes5.d @ 295:895e1b50cf2a trunk

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[svn r316] Fixed array slice assignments like: int[] arr = ...; arr[] = 42; There was problems with most non basic types... Added an option to premake so we can do: premake --target gnu --no-boehm to disable the Boehm GC.
author lindquist
date Mon, 23 Jun 2008 14:48:42 +0200
parents d9d5d59873d8
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
6
35d93ce68cf4 [svn r10] Updated for LLVM rev. 20070913
lindquist
parents:
diff changeset
1 module classes5;
270
d9d5d59873d8 [svn r291] Fixed a bunch of the old Phobos tests to work with Tango.
lindquist
parents: 8
diff changeset
2 extern(C) int printf(char*, ...);
6
35d93ce68cf4 [svn r10] Updated for LLVM rev. 20070913
lindquist
parents:
diff changeset
3
35d93ce68cf4 [svn r10] Updated for LLVM rev. 20070913
lindquist
parents:
diff changeset
4 struct S
35d93ce68cf4 [svn r10] Updated for LLVM rev. 20070913
lindquist
parents:
diff changeset
5 {
35d93ce68cf4 [svn r10] Updated for LLVM rev. 20070913
lindquist
parents:
diff changeset
6 long l;
35d93ce68cf4 [svn r10] Updated for LLVM rev. 20070913
lindquist
parents:
diff changeset
7 }
35d93ce68cf4 [svn r10] Updated for LLVM rev. 20070913
lindquist
parents:
diff changeset
8
35d93ce68cf4 [svn r10] Updated for LLVM rev. 20070913
lindquist
parents:
diff changeset
9 class C
35d93ce68cf4 [svn r10] Updated for LLVM rev. 20070913
lindquist
parents:
diff changeset
10 {
35d93ce68cf4 [svn r10] Updated for LLVM rev. 20070913
lindquist
parents:
diff changeset
11 C c;
35d93ce68cf4 [svn r10] Updated for LLVM rev. 20070913
lindquist
parents:
diff changeset
12 S s;
35d93ce68cf4 [svn r10] Updated for LLVM rev. 20070913
lindquist
parents:
diff changeset
13 }
35d93ce68cf4 [svn r10] Updated for LLVM rev. 20070913
lindquist
parents:
diff changeset
14
35d93ce68cf4 [svn r10] Updated for LLVM rev. 20070913
lindquist
parents:
diff changeset
15 void main()
35d93ce68cf4 [svn r10] Updated for LLVM rev. 20070913
lindquist
parents:
diff changeset
16 {
8
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 6
diff changeset
17 C c = new C;
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 6
diff changeset
18 long* lp = void;
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 6
diff changeset
19 {c.s.l = 64;}
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 6
diff changeset
20 {assert(c.s.l == 64);}
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 6
diff changeset
21 {lp = &c.s.l;}
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 6
diff changeset
22 {assert(*lp == 64);}
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 6
diff changeset
23 printf("classes5 success\n");
6
35d93ce68cf4 [svn r10] Updated for LLVM rev. 20070913
lindquist
parents:
diff changeset
24 }