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

[Sandro Santilli]

CVSROOT:        /sources/gnash
Module name:    gnash
Changes by:     Sandro Santilli <strk>  06/12/07 15:13:33

Modified files:
        .              : ChangeLog 
        testsuite/actionscript.all: String.as 

Log message:
                * testsuite/actionscript.all/String.as:
                  Added test for SUBSTRIN tag, but only
                  enabled if MING_SUPPORTS_ASM is defined
                  (which never happens atm.. should add that).

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnash/ChangeLog?cvsroot=gnash&r1=1.1880&r2=1.1881
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/actionscript.all/String.as?cvsroot=gnash&r1=1.6&r2=1.7

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/gnash/gnash/ChangeLog,v
retrieving revision 1.1880
retrieving revision 1.1881
diff -u -b -r1.1880 -r1.1881
--- ChangeLog   7 Dec 2006 15:08:13 -0000       1.1880
+++ ChangeLog   7 Dec 2006 15:13:33 -0000       1.1881
@@ -1,5 +1,9 @@
 2006-12-07 Sandro Santilli <address@hidden>
 
+       * testsuite/actionscript.all/String.as:
+         Added test for SUBSTRIN tag, but only
+         enabled if MING_SUPPORTS_ASM is defined
+         (which never happens atm.. should add that).
        * server/vm/ASHandlers.cpp (ActionSubString):
          when size argument is too big fix it rather
          then returning undefined.

Index: testsuite/actionscript.all/String.as
===================================================================
RCS file: /sources/gnash/gnash/testsuite/actionscript.all/String.as,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- testsuite/actionscript.all/String.as        25 Nov 2006 11:06:58 -0000      
1.6
+++ testsuite/actionscript.all/String.as        7 Dec 2006 15:13:33 -0000       
1.7
@@ -1,7 +1,7 @@
 // Mike Carlson's test program for actionscript strings
 // June 19th, 2006
 
-rcsid="$Id: String.as,v 1.6 2006/11/25 11:06:58 strk Exp $";
+rcsid="$Id: String.as,v 1.7 2006/12/07 15:13:33 strk Exp $";
 
 #include "check.as"
 
@@ -51,6 +51,26 @@
 check_equals ( a.substring(5,7), "fg" );
 check_equals ( a.length, 26 );
 check_equals ( a.concat("sir ","william",15), "abcdefghijklmnopqrstuvwxyzsir 
william15");
+var b = new String("1234");
+check_equals ( b.substring(3, 6), "4");
+check_equals ( b.substr(3, 6), "4");
+
+#ifdef MING_SUPPORTS_ASM
+// We need ming-0.4.0beta2 or later for this to work...
+// This is the only way to generate an SWFACTION_SUBSTRING
+// tag (the calls above generate a CALLMETHOD tag)
+//
+asm {
+       push "b"
+       push "ciao"
+       push "2"
+       push "10" // size is bigger then string length,
+                 // we expect the interpreter to adjust it
+       substring
+       setvariable
+};
+check_equals( b, "iao");
+#endif
 
 
 // Test inheritance with built-in functions