[Gnash-commit] gnash ChangeLog testsuite/actionscript.all/swf_...

[Sandro Santilli]

CVSROOT:        /sources/gnash
Module name:    gnash
Changes by:     Sandro Santilli <strk>  06/10/05 13:42:33

Modified files:
        .              : ChangeLog 
        testsuite/actionscript.all: swf_exists.exp 

Log message:
        * testsuite/actionscript.all/swf_exists.exp: allow inclusion of 
non-text chars in messages (needed to also print line number of tests).

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnash/ChangeLog?cvsroot=gnash&r1=1.1036&r2=1.1037
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/actionscript.all/swf_exists.exp?cvsroot=gnash&r1=1.6&r2=1.7

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/gnash/gnash/ChangeLog,v
retrieving revision 1.1036
retrieving revision 1.1037
diff -u -b -r1.1036 -r1.1037
--- ChangeLog   5 Oct 2006 13:25:27 -0000       1.1036
+++ ChangeLog   5 Oct 2006 13:42:32 -0000       1.1037
@@ -1,5 +1,11 @@
 2006-10-05 Sandro Santilli <address@hidden>
 
+       * testsuite/actionscript.all/swf_exists.exp: allow inclusion
+         of non-text chars in messages (needed to also print line
+         number of tests).
+
+2006-10-05 Sandro Santilli <address@hidden>
+
        * testsuite/actionscript.all/swf_exists.exp: add test filename
          in output.
 

Index: testsuite/actionscript.all/swf_exists.exp
===================================================================
RCS file: /sources/gnash/gnash/testsuite/actionscript.all/swf_exists.exp,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- testsuite/actionscript.all/swf_exists.exp   5 Oct 2006 13:25:27 -0000       
1.6
+++ testsuite/actionscript.all/swf_exists.exp   5 Oct 2006 13:42:33 -0000       
1.7
@@ -45,37 +45,37 @@
            set timetol 0
            exp_continue
        }
-       -re "NOTE:${text}*" {
-           regsub "\[\n\r\t\]*NOTE: $text\r\n" $expect_out(0,string) "" output
-           set output [string range $output 6 end]
+       -re "NOTE:.*" {
+           regsub "\[\n\r\t\]*NOTE: " $expect_out(0,string) "" output
+           set output [string range $output 6 end-2]
            verbose "${testid}: $output" 2
            set timetol 0
            exp_continue
        }
-       -re "PASSED:${text}*" {
-           regsub "\[\n\r\t\]*PASSED: $text\r\n" $expect_out(0,string) "" 
output
-           set output [string range $output 8 end]
+       -re "PASSED:.*" {
+           regsub "\[\n\r\t\]*PASSED: " $expect_out(0,string) "" output
+           set output [string range $output 0 end-2]
            pass "${testid}: $output"
            set timetol 0
            exp_continue
        }
-       -re "FAILED:${text}*" {
-           regsub "\[\n\r\t\]*FAILED: $text\r\n" $expect_out(0,string) "" 
output
-           set output [string range $output 8 end]
+       -re "FAILED:.*" {
+           regsub "\[\n\r\t\]*FAILED: " $expect_out(0,string) "" output
+           set output [string range $output 0 end-2] 
            fail "${testid}: $output"
            set timetol 0
            exp_continue
        }
-       -re "UNTESTED:${text}*" {
-           regsub "\[\n\r\t\]*TESTED: $text\r\n" $expect_out(0,string) "" 
output
-           set output [string range $output 8 end]
+       -re "UNTESTED:.*" {
+           regsub "\[\n\r\t\]*TESTED: " $expect_out(0,string) "" output
+           set output [string range $output 8 end-2]
            untested "${testid}: $output"
            set timetol 0
            exp_continue
        }
-       -re "UNRESOLVED:${text}*" {
-           regsub "\[\n\r\t\]*UNRESOLVED: $text\r\n" $expect_out(0,string) "" 
output
-           set output [string range $output 8 end]
+       -re "UNRESOLVED:.*" {
+           regsub "\[\n\r\t\]*UNRESOLVED: " $expect_out(0,string) "" output
+           set output [string range $output 8 end-2]
            unresolved "${testid}: $output"
            set timetol 0
            exp_continue