CVSROOT: /sources/gnash
Module name: gnash
Changes by: Sandro Santilli <strk> 08/01/16 15:09:48
Modified files:
. : ChangeLog
testsuite/misc-ming.all: shape_test.c
Log message:
test that clip events are not invoked for shape placements.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnash/ChangeLog?cvsroot=gnash&r1=1.5412&r2=1.5413
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/misc-ming.all/shape_test.c?cvsroot=gnash&r1=1.6&r2=1.7
Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/gnash/gnash/ChangeLog,v
retrieving revision 1.5412
retrieving revision 1.5413
diff -u -b -r1.5412 -r1.5413
--- ChangeLog 16 Jan 2008 11:31:07 -0000 1.5412
+++ ChangeLog 16 Jan 2008 15:09:47 -0000 1.5413
@@ -1,5 +1,10 @@
2008-01-16 Sandro Santilli <[EMAIL PROTECTED]>
+ * testsuite/misc-ming.all/shape_test.c: test that clip events
+ are not invoked for shape placements.
+
+2008-01-16 Sandro Santilli <[EMAIL PROTECTED]>
+
* testsuite/misc-swfc.all/: Makefile.am, button_test1.sc:
initial test for button interaction
* server/button_character_instance.{cpp,h}: allow
Index: testsuite/misc-ming.all/shape_test.c
===================================================================
RCS file: /sources/gnash/gnash/testsuite/misc-ming.all/shape_test.c,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- testsuite/misc-ming.all/shape_test.c 7 Nov 2007 21:58:35 -0000
1.6
+++ testsuite/misc-ming.all/shape_test.c 16 Jan 2008 15:09:48 -0000
1.7
@@ -125,7 +125,7 @@
*
*/
{ /* using left fill, non-closed paths */
- SWFDisplayItem it;
+ SWFDisplayItem it1, it2;
SWFShape sh = newSWFShape();
SWFMovieClip mc = newSWFMovieClip();
SWFShape_setLineStyle(sh, 1, 0, 0, 0, 255);
@@ -140,11 +140,38 @@
SWFShape_drawLineTo(sh, 30, 20); /* 7 */
SWFShape_drawLineTo(sh, 30, 30); /* 8 */
SWFShape_drawLineTo(sh, 20, 30); /* 9 */
- it = SWFMovieClip_add(mc, (SWFBlock)sh);
- SWFDisplayItem_moveTo(it, 80, 120);
- SWFDisplayItem_scale(it, 2, 2);
+ it1 = SWFMovieClip_add(mc, (SWFBlock)sh);
+
+ // Test that clip events are not invoked for shapes
+#if 0 // current Ming HEAD chokes if we add an onClipConstruct event...
+ SWFDisplayItem_addAction(it1, newSWFAction(
+ "_root.check(false && 'clip event for shape should not be
executed');"
+ SWFACTION_CONSTRUCT);
+#endif
+ SWFDisplayItem_addAction(it1, newSWFAction(
+ "_root.check(false && 'clip event for shape should not be
executed');"
+ ), SWFACTION_ENTERFRAME);
+ SWFDisplayItem_addAction(it1, newSWFAction(
+ "_root.check(false && 'clip event for shape should not be
executed');"
+ ), SWFACTION_ONLOAD);
+ SWFDisplayItem_addAction(it1, newSWFAction(
+ "_root.check(false && 'clip event for shape should not be
executed');"
+ ), SWFACTION_UNLOAD);
+ SWFDisplayItem_addAction(it1, newSWFAction(
+ "_root.check(false && 'clip event for shape should not be
executed');"
+ ), SWFACTION_MOUSEMOVE);
+ SWFDisplayItem_addAction(it1, newSWFAction(
+ "_root.check(false && 'clip event for shape should not be
executed');"
+ ), SWFACTION_MOUSEDOWN);
+ // None of these should be executed
+ SWFDisplayItem_addAction(it1, newSWFAction(
+ "_root.check(false && 'clip event for shape should not be
executed');"
+ ), SWFACTION_ONLOAD);
+
+ SWFDisplayItem_moveTo(it1, 80, 120);
+ SWFDisplayItem_scale(it1, 2, 2);
SWFMovieClip_nextFrame(mc);
- it = SWFMovie_add(mo, (SWFBlock)mc);
+ it2 = SWFMovie_add(mo, (SWFBlock)mc);
}
{ /* using right fill, non-closed paths */
SWFDisplayItem it;
_______________________________________________
Gnash-commit mailing list
Gnash-commit@gnu.org
http://lists.gnu.org/mailman/listinfo/gnash-commit
