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

[Sandro Santilli]

CVSROOT:        /sources/gnash
Module name:    gnash
Changes by:     Sandro Santilli <strk>  07/02/01 14:52:13

Modified files:
        .              : ChangeLog 
        testsuite/misc-ming.all: ming_utils.c 
        doc/C          : internals.xml 

Log message:
                * doc/C/internals.xml (Writing self-contained SWF tests):
                  Document new optional argument for check() and xcheck().
                * testsuite/misc-ming.all/ming_utils.c (get_dejagnu_actions):
                  Allow second argument to check() and xcheck() for an explicit
                  label.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnash/ChangeLog?cvsroot=gnash&r1=1.2215&r2=1.2216
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/misc-ming.all/ming_utils.c?cvsroot=gnash&r1=1.20&r2=1.21
http://cvs.savannah.gnu.org/viewcvs/gnash/doc/C/internals.xml?cvsroot=gnash&r1=1.54&r2=1.55

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/gnash/gnash/ChangeLog,v
retrieving revision 1.2215
retrieving revision 1.2216
diff -u -b -r1.2215 -r1.2216
--- ChangeLog   1 Feb 2007 13:40:07 -0000       1.2215
+++ ChangeLog   1 Feb 2007 14:52:13 -0000       1.2216
@@ -1,5 +1,13 @@
 2007-02-01 Sandro Santilli <address@hidden>
 
+       * doc/C/internals.xml (Writing self-contained SWF tests):
+         Document new optional argument for check() and xcheck().
+       * testsuite/misc-ming.all/ming_utils.c (get_dejagnu_actions):
+         Allow second argument to check() and xcheck() for an explicit
+         label.
+
+2007-02-01 Sandro Santilli <address@hidden>
+
        * server/as_object.h (get_primitive_value): return
          an OBJECT value by default (not a number).
        * server/as_value.cpp (operator==): avoid infinite

Index: testsuite/misc-ming.all/ming_utils.c
===================================================================
RCS file: /sources/gnash/gnash/testsuite/misc-ming.all/ming_utils.c,v
retrieving revision 1.20
retrieving revision 1.21
diff -u -b -r1.20 -r1.21
--- testsuite/misc-ming.all/ming_utils.c        30 Dec 2006 23:39:04 -0000      
1.20
+++ testsuite/misc-ming.all/ming_utils.c        1 Feb 2007 14:52:13 -0000       
1.21
@@ -162,7 +162,7 @@
 {
        SWFAction ac;
 
-       static const size_t BUFLEN = 2048;
+       static const size_t BUFLEN = 4096;
 
        char buf[BUFLEN];
        snprintf(buf, BUFLEN,
@@ -222,13 +222,13 @@
                " if ( obt == exp ) _root.runtest.xpass(obt+' == '+exp);\n"
                " else _root.runtest.xfail('expected: '+exp+' , obtained: 
'+obt);\n"
                "};\n"
-               "_root.check = function(a) {\n"
-               " if ( a ) _root.runtest.pass(a);\n"
-               " else _root.runtest.fail(a);\n"
-               "};\n"
-               "_root.xcheck = function(a) {\n"
-               " if ( a ) _root.runtest.xpass(a);\n"
-               " else _root.runtest.xfail(a);\n"
+               "_root.check = function(a, msg) {\n"
+               " if ( a ) _root.runtest.pass(msg != undefined ? msg : a);\n"
+               " else _root.runtest.fail(msg != undefined ? msg : a);\n"
+               "};\n"
+               "_root.xcheck = function(a, msg) {\n"
+               " if ( a ) _root.runtest.xpass(msg != undefined ? msg : a);\n"
+               " else _root.runtest.xfail(msg != undefined ? msg : a);\n"
                "};\n"
                "_root.fail = function(msg) {\n"
                " _root.runtest.fail(msg);\n"

Index: doc/C/internals.xml
===================================================================
RCS file: /sources/gnash/gnash/doc/C/internals.xml,v
retrieving revision 1.54
retrieving revision 1.55
diff -u -b -r1.54 -r1.55
--- doc/C/internals.xml 22 Jan 2007 07:12:53 -0000      1.54
+++ doc/C/internals.xml 1 Feb 2007 14:52:13 -0000       1.55
@@ -1523,11 +1523,13 @@
        untested):
        <programlisting>
 
-       check(expression);
+       check(expression, [message]);
 
                Evaluate the expression.
                Trace result (PASSED: expression / FAILED: expression).
                If fails, *visually* trace the failure.
+               If second argument is given, it will be used instead of
+               'expression' for printing results.
 
        check_equals(obtained, expected)
 
@@ -1535,11 +1537,13 @@
                Trace result (PASSED: obtained == expected / FAILED: expected 
X, obtained Y)
                If fails, *visually* trace the failure.
 
-       xcheck(expression);
+       xcheck(expression, [message]);
 
                Evaluate the expression.
                Trace result (XPASSED: expression / XFAILED: expression).
                If fails, *visually* trace the failure.
+               If second argument is given, it will be used instead of
+               'expression' for printing results.
 
        xcheck_equals(obtained, expected)