[Gnash-commit] gnash ChangeLog testsuite/misc-ming.all/shape_t...

[Sandro Santilli]

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 <address@hidden>
 
+       * testsuite/misc-ming.all/shape_test.c: test that clip events
+         are not invoked for shape placements.
+
+2008-01-16 Sandro Santilli <address@hidden>
+
        * 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;