add parent to __traits for QtD support

michelf · Apr 18, 2011 · 2e261cd · 2e261cd
1 parent 7740c0e
commit 2e261cd
Show file tree

Hide file tree

Showing 2 changed files with 18 additions and 2 deletions.
diff --git a/src/idgen.c b/src/idgen.c
@@ -1,6 +1,6 @@
 
 // Compiler implementation of the D programming language
-// Copyright (c) 1999-2010 by Digital Mars
+// Copyright (c) 1999-2011 by Digital Mars
 // All Rights Reserved
 // written by Walter Bright
 // http://www.digitalmars.com
@@ -312,6 +312,7 @@ Msgtable msgtable[] =
     { "isLazy" },
     { "hasMember" },
     { "identifier" },
+    { "parent" },
     { "getMember" },
     { "getOverloads" },
     { "getVirtualFunctions" },

diff --git a/src/traits.c b/src/traits.c
@@ -1,6 +1,6 @@
 
 // Compiler implementation of the D programming language
-// Copyright (c) 1999-2010 by Digital Mars
+// Copyright (c) 1999-2011 by Digital Mars
 // All Rights Reserved
 // written by Walter Bright
 // http://www.digitalmars.com
@@ -196,6 +196,21 @@ Expression *TraitsExp::semantic(Scope *sc)
         StringExp *se = new StringExp(loc, s->ident->toChars());
         return se->semantic(sc);
     }
+    else if (ident == Id::parent)
+    {
+        if (dim != 1)
+            goto Ldimerror;
+        Object *o = (Object *)args->data[0];
+        Dsymbol *s = getDsymbol(o);
+        if (s)
+            s = s->toParent();
+        if (!s)
+        {
+            error("argument %s has no parent", o->toChars());
+            goto Lfalse;
+        }
+        return (new DsymbolExp(loc, s))->semantic(sc);
+    }
 
 #endif
     else if (ident == Id::hasMember ||