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
_______________________________________________
Gnash-commit mailing list
Gnash-commit@gnu.org
http://lists.gnu.org/mailman/listinfo/gnash-commit
