[Gnash-commit] gnash/testsuite/actionscript.all getvariable.as

[Sandro Santilli]

CVSROOT:        /sources/gnash
Module name:    gnash
Changes by:     Sandro Santilli <strk>  07/11/22 20:49:38

Modified files:
        testsuite/actionscript.all: getvariable.as 

Log message:
        more tests

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/actionscript.all/getvariable.as?cvsroot=gnash&r1=1.19&r2=1.20

Patches:
Index: getvariable.as
===================================================================
RCS file: /sources/gnash/gnash/testsuite/actionscript.all/getvariable.as,v
retrieving revision 1.19
retrieving revision 1.20
diff -u -b -r1.19 -r1.20
--- getvariable.as      22 Nov 2007 19:37:52 -0000      1.19
+++ getvariable.as      22 Nov 2007 20:49:38 -0000      1.20
@@ -19,7 +19,7 @@
 // compile this test case with Ming makeswf, and then
 // execute it like this gnash -1 -r 0 -v out.swf
 
-rcsid="$Id: getvariable.as,v 1.19 2007/11/22 19:37:52 strk Exp $";
+rcsid="$Id: getvariable.as,v 1.20 2007/11/22 20:49:38 strk Exp $";
 
 #include "check.as"
 
@@ -137,6 +137,36 @@
 #endif
 
 //---------------------------------------------------------------------
+// Check '/mc/mc/' access 
+//---------------------------------------------------------------------
+
+asm {
+        push 'checkpoint'
+       push '/mc/mc/'
+       getvariable
+        setvariable
+};
+#if OUTPUT_VERSION > 5
+ xcheck_equals(typeof(checkpoint), 'movieclip');
+ xcheck_equals(checkpoint, _level0.mc.mc);
+#else
+ check_equals(typeof(checkpoint), 'undefined');
+ check_equals(checkpoint, _level0.mc.mc);
+#endif
+
+//---------------------------------------------------------------------
+// Check '/mc/mc/:' access 
+//---------------------------------------------------------------------
+
+asm {
+        push 'checkpoint'
+       push '/mc/mc/:'
+       getvariable
+        setvariable
+};
+check_equals(typeof(checkpoint), 'undefined');
+
+//---------------------------------------------------------------------
 // Check '/mc/mc:' access 
 //---------------------------------------------------------------------
 
@@ -580,9 +610,9 @@
 //-----------------------------------------------------------------------
 
 #if OUTPUT_VERSION < 6
- xcheck_totals(42); // gnash runs 44 tests ?!
+ xcheck_totals(45); // gnash runs +2 tests ?!
 #else
- xcheck_totals(47); // gnash runs 49 tests ?!
+ xcheck_totals(50); // gnash runs +2 tests ?!
 #endif
 
 #else // ndef MING_SUPPORT_ASM