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

[Sandro Santilli]

CVSROOT:        /sources/gnash
Module name:    gnash
Changes by:     Sandro Santilli <strk>  07/03/30 09:31:48

Modified files:
        .              : ChangeLog 
        testsuite/misc-ming.all: intervalTest.as intervalTestRunner.cpp 

Log message:
                * testsuite/misc-ming.all/: intervalTest.as, 
intervalTestRunner.cpp:
                  Add test for setInterval() calls with additinal args (Gnash 
fails).

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnash/ChangeLog?cvsroot=gnash&r1=1.2728&r2=1.2729
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/misc-ming.all/intervalTest.as?cvsroot=gnash&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/misc-ming.all/intervalTestRunner.cpp?cvsroot=gnash&r1=1.1&r2=1.2

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/gnash/gnash/ChangeLog,v
retrieving revision 1.2728
retrieving revision 1.2729
diff -u -b -r1.2728 -r1.2729
--- ChangeLog   30 Mar 2007 09:01:28 -0000      1.2728
+++ ChangeLog   30 Mar 2007 09:31:48 -0000      1.2729
@@ -1,5 +1,7 @@
 2007-03-30 Sandro Santilli <address@hidden>
 
+       * testsuite/misc-ming.all/: intervalTest.as, intervalTestRunner.cpp:
+         Add test for setInterval() calls with additinal args (Gnash fails).
        * server/asobj/xmlsocket.cpp: don't attempt to send
          data when not connected !
        * testsuite/misc-ming.all/Makefile.am: prepared for

Index: testsuite/misc-ming.all/intervalTest.as
===================================================================
RCS file: /sources/gnash/gnash/testsuite/misc-ming.all/intervalTest.as,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- testsuite/misc-ming.all/intervalTest.as     9 Feb 2007 14:42:00 -0000       
1.2
+++ testsuite/misc-ming.all/intervalTest.as     30 Mar 2007 09:31:48 -0000      
1.3
@@ -46,7 +46,17 @@
                xtrace("That interval cleared ");
                this_interval = setInterval(do_this, 1);
                // interval 1 is NOT reused
-               check_equals(this_interval, 3);
+               check_equals(this_interval, 4); // interval 3 is set from 
within do_that
+       }
+};
+
+push_args = function() {
+       xcheck_equals(arguments.length, 3);
+       clearInterval(push_interval);
+       xtrace("Pushing "+arguments.length+" args");
+       for (var i=0; i<arguments.length; i++)
+       {
+               pushed_args[i] = arguments[i];
        }
 };
 
@@ -58,4 +68,8 @@
 that_interval  = setInterval(do_that, 1000);
 check_equals(that_interval, 2);
 
+pushed_args = new Array;
+push_interval  = setInterval(push_args, 200, 8, 9, 10);
+check_equals(push_interval, 3);
+
 stop();

Index: testsuite/misc-ming.all/intervalTestRunner.cpp
===================================================================
RCS file: /sources/gnash/gnash/testsuite/misc-ming.all/intervalTestRunner.cpp,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -b -r1.1 -r1.2
--- testsuite/misc-ming.all/intervalTestRunner.cpp      9 Feb 2007 14:42:00 
-0000       1.1
+++ testsuite/misc-ming.all/intervalTestRunner.cpp      30 Mar 2007 09:31:48 
-0000      1.2
@@ -112,6 +112,9 @@
        root->get_member("that_counter", &tmp);
        check_equals(tmp.to_number(), 4);
 
+       root->get_member("pushed_args", &tmp);
+       xcheck_equals(tmp.to_string(), "8,9,10");
+
        root->get_member("test_completed", &tmp);
        check_equals(tmp.to_number(), 1);