[common] An extra sanity check for add_parent (discovered missing whi…

…le fixing the previous issue, though unrelated to it).
jnthn · Nov 17, 2010 · 0b1a12d · 0b1a12d
1 parent 9269db5
commit 0b1a12d
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/common/NQP/NQPSetting.pm b/common/NQP/NQPSetting.pm
@@ -524,6 +524,9 @@ my knowhow NQPClassHOW {
         if $!composed {
             die("NQPClassHOW does not support adding parents after being composed.");
         }
+        if $obj =:= $parent {
+            die("Cannot make a class its own parent.");
+        }
         my $i := 0;
         while $i != +@!parents {
             if @!parents[$i] =:= $parent {