Mercurial > projects > ldc

annotate test/interface4.d @ 120:5ce8ab11e75a trunk

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[svn r124] Fixed another D vararg + return in ptr bug. Fixed some nested function calls failed to resolve the context ptr.
author lindquist
date Mon, 26 Nov 2007 07:26:21 +0100
parents 27b9f749d9fe
children 44a95ac7368a
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
113
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
1 module interface4;
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
2
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
3 interface I
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
4 {
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
5 void func();
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
6 }
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
7
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
8 interface I2
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
9 {
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
10 void func();
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
11 }
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
12
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
13 class C : I,I2
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
14 {
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
15 int i = 42;
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
16 override void func()
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
17 {
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
18 printf("hello %d\n", i);
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
19 i++;
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
20 }
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
21 }
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
22
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
23 void main()
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
24 {
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
25 scope c = new C;
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
26 c.func();
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
27 I i = c;
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
28 i.func();
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
29 I2 i2 = c;
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
30 i2.func();
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
31 printf("final %d\n", c.i);
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
32 assert(c.i == 45);
27b9f749d9fe [svn r117] Initial working implementation of interfaces.
lindquist
parents:
diff changeset
33 }