[Gnash-commit] /srv/bzr/gnash/trunk r11119: Tests for constructors.

[Benjamin Wolsey]

------------------------------------------------------------
revno: 11119
committer: Benjamin Wolsey <address@hidden>
branch nick: trunk
timestamp: Mon 2009-06-15 21:04:43 +0200
message:
  Tests for constructors.
modified:
  testsuite/as3/class.as

=== modified file 'testsuite/as3/class.as'
--- a/testsuite/as3/class.as    2009-06-15 17:07:37 +0000
+++ b/testsuite/as3/class.as    2009-06-15 19:04:43 +0000
@@ -45,6 +45,9 @@
         public function Hello() {
 
             check_equals(S, "[class S]");
+            check_equals(S.constructor, "[class Class]");
+            check_equals(S.__constructor__, undefined);
+            
             check_equals(S.s, null);
             check_equals(typeof(S.s), "object");
 
@@ -54,11 +57,18 @@
             check_equals(Base, "[class Base]");
             check_equals(Derived, "[class Derived]");
 
+            check_equals(Derived.constructor, "[class Class]");
+            check_equals(Base.constructor, "[class Class]");
+            check_equals(Derived.__constructor__, undefined);
+            check_equals(Base.__constructor__, undefined);
+
             var b1 : Base = new Base();
             check(b1 instanceof Base);
             check(!(b1 instanceof Derived));
             check_equals(S.s, "Hello Base ");
             
+            check_equals(b1.constructor, "[class Base]");
+            
             S.s = "";
             var b2 : Base = new Derived();
             check(b2 instanceof Base);