CVSROOT: /sources/gnash
Module name: gnash
Changes by: Sandro Santilli <strk> 07/11/22 19:37:52
Modified files:
. : ChangeLog
testsuite/actionscript.all: getvariable.as
Log message:
another couple of tests
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnash/ChangeLog?cvsroot=gnash&r1=1.4925&r2=1.4926
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/actionscript.all/getvariable.as?cvsroot=gnash&r1=1.18&r2=1.19
Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/gnash/gnash/ChangeLog,v
retrieving revision 1.4925
retrieving revision 1.4926
diff -u -b -r1.4925 -r1.4926
--- ChangeLog 22 Nov 2007 18:50:55 -0000 1.4925
+++ ChangeLog 22 Nov 2007 19:37:51 -0000 1.4926
@@ -1,5 +1,9 @@
2007-11-22 Sandro Santilli <[EMAIL PROTECTED]>
+ * testsuite/actionscript.all/getvariable.as: another test
+
+2007-11-22 Sandro Santilli <[EMAIL PROTECTED]>
+
* server/as_environment.{cpp,h}: drop the is_slash_based
parameter from parse_path, which gets simplified a bit.
Index: testsuite/actionscript.all/getvariable.as
===================================================================
RCS file: /sources/gnash/gnash/testsuite/actionscript.all/getvariable.as,v
retrieving revision 1.18
retrieving revision 1.19
diff -u -b -r1.18 -r1.19
--- testsuite/actionscript.all/getvariable.as 22 Nov 2007 18:05:11 -0000
1.18
+++ testsuite/actionscript.all/getvariable.as 22 Nov 2007 19:37:52 -0000
1.19
@@ -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.18 2007/11/22 18:05:11 strk Exp $";
+rcsid="$Id: getvariable.as,v 1.19 2007/11/22 19:37:52 strk Exp $";
#include "check.as"
@@ -33,6 +33,7 @@
mc1.mem = 'mc1';
mc2 = mc1.createEmptyMovieClip('mc', 1);
mc2.mem = 'mc2';
+mc2.o = new Object();
//---------------------------------------------------------------------
// Check access to root variable (simplest case)
@@ -121,7 +122,6 @@
// Check '/mc/mc' access
//---------------------------------------------------------------------
-var variable_in_root = 6;
asm {
push 'checkpoint'
push '/mc/mc'
@@ -140,7 +140,6 @@
// Check '/mc/mc:' access
//---------------------------------------------------------------------
-var variable_in_root = 6;
asm {
push 'checkpoint'
push '/mc/mc:'
@@ -154,7 +153,6 @@
// (expected to fail, but I'm not sure why)
//---------------------------------------------------------------------
-var variable_in_root = 6;
asm {
push 'checkpoint'
push '/mc/mc/mem'
@@ -163,6 +161,35 @@
};
check_equals(typeof(checkpoint), 'undefined');
+//---------------------------------------------------------------------
+// Check '/mc/mc/o' access
+// (expected to fail, but I'm not sure why)
+//---------------------------------------------------------------------
+
+asm {
+ push 'checkpoint'
+ push '/mc/mc/o'
+ getvariable
+ setvariable
+};
+check_equals(typeof(checkpoint), 'undefined');
+
+//---------------------------------------------------------------------
+// Check '/mc/mc:mem' access
+//---------------------------------------------------------------------
+
+asm {
+ push 'checkpoint'
+ push '/mc/mc:mem'
+ getvariable
+ setvariable
+};
+#if OUTPUT_VERSION > 5
+ check_equals(checkpoint, 'mc2');
+#else
+ check_equals(typeof(checkpoint), 'undefined');
+#endif
+
//---------------------------------------------------------------------
// Check '../:variable_in_root' access
@@ -553,9 +580,9 @@
//-----------------------------------------------------------------------
#if OUTPUT_VERSION < 6
- xcheck_totals(40); // gnash runs 42 tests ?!
+ xcheck_totals(42); // gnash runs 44 tests ?!
#else
- xcheck_totals(45); // gnash runs 47 tests ?!
+ xcheck_totals(47); // gnash runs 49 tests ?!
#endif
#else // ndef MING_SUPPORT_ASM
_______________________________________________
Gnash-commit mailing list
Gnash-commit@gnu.org
http://lists.gnu.org/mailman/listinfo/gnash-commit
