Mercurial > projects > ldc

diff tests/mini/t.d @ 341:1bb99290e03a trunk
[svn r362] Started merging the old 'test' dir as well as the newer 'tangotests' dir into 'tests/mini' and 'tests/minicomplex'.
author: lindquist
date: Sun, 13 Jul 2008 02:51:19 +0200
parents: tangotests/t.d@336ec4f4bbb3
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/tests/mini/t.d	Sun Jul 13 02:51:19 2008 +0200
@@ -0,0 +1,34 @@
+interface MyInterface
+{
+    int func();
+}
+
+class MyClass : MyInterface
+{
+    int var;
+    int func()
+    {
+        return var;
+    }
+}
+
+void func1(MyInterface i)
+{
+    int delegate() dg = &i.func;
+    func2(dg);
+}
+
+extern(C) int printf(char*, ...);
+
+void func2(int delegate() dg)
+{
+    int i = dg();
+    printf("%d\n", i);
+}
+
+void main()
+{
+    auto c = new MyClass;
+    c.var = 42;
+    func1(c);
+}