CVSROOT: /sources/gnash
Module name: gnash
Changes by: Sandro Santilli <strk> 07/10/23 16:43:06
Modified files:
testsuite/actionscript.all: with.as
Log message:
more failures
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/actionscript.all/with.as?cvsroot=gnash&r1=1.30&r2=1.31
Patches:
Index: with.as
===================================================================
RCS file: /sources/gnash/gnash/testsuite/actionscript.all/with.as,v
retrieving revision 1.30
retrieving revision 1.31
diff -u -b -r1.30 -r1.31
--- with.as 23 Oct 2007 15:32:54 -0000 1.30
+++ with.as 23 Oct 2007 16:43:06 -0000 1.31
@@ -21,7 +21,7 @@
// compile this test case with Ming makeswf, and then
// execute it like this gnash -1 -r 0 -v out.swf
-rcsid="$Id: with.as,v 1.30 2007/10/23 15:32:54 strk Exp $";
+rcsid="$Id: with.as,v 1.31 2007/10/23 16:43:06 strk Exp $";
#include "check.as"
@@ -452,11 +452,22 @@
createEmptyMovieClip("mc", 1);
mc.createEmptyMovieClip("child", 1);
mc.mem = "mcMember";
+mc.hidden = "hidden";
+ASSetPropFlags(mc, "hidden", 4, 1);
+MovieClip.prototype.inheritedMem = "McProto";
with (mc)
{
- child = "rootChild";
- mem = "mcMemberUpdated";
-}
+ child = "rootChild"; // non-proper in mc, will be set in root
+ mem = "mcMemberUpdated"; // overridable in mc, will be updated
+ hidden = "hiddenUpdated"; // protected from override in mc, but
existing. Will NOT be set in _root
+ nonexistent = "nonExistent"; // non-existing in mc, will be set in root
+ inheritedMem = "McProtoOverridden"; // non own-property of mc, will be
set in root
+}
+xcheck_equals(inheritedMem, "McProtoOverridden");
+xcheck_equals(mc.inheritedMem, "McProto");
+check_equals(nonexistent, 'nonExistent');
+check_equals(typeof(hidden), 'undefined');
+check_equals(mc.hidden, 'hidden');
check_equals(typeof(mem), 'undefined');
check_equals(mc.mem, "mcMemberUpdated");
xcheck_equals(typeof(mc.child), 'movieclip');
@@ -470,5 +481,5 @@
#if OUTPUT_VERSION < 6
check_totals(41);
#else
- check_totals(76);
+ check_totals(81);
#endif
_______________________________________________
Gnash-commit mailing list
Gnash-commit@gnu.org
http://lists.gnu.org/mailman/listinfo/gnash-commit
