CVSROOT: /sources/gnash
Module name: gnash
Changes by: Sandro Santilli <strk> 07/08/20 11:13:17
Modified files:
. : ChangeLog
testsuite/misc-mtasc.all: Makefile.am
Added files:
testsuite/misc-mtasc.all: exception.as
Log message:
Patch by Asger Ottar Alstrup <[EMAIL PROTECTED]>:
* testsuite/misc-mtasc.all/: Makefile.am, exception.as:
Test for try/catch (gnash fails).
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnash/ChangeLog?cvsroot=gnash&r1=1.4043&r2=1.4044
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/misc-mtasc.all/Makefile.am?cvsroot=gnash&r1=1.13&r2=1.14
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/misc-mtasc.all/exception.as?cvsroot=gnash&rev=1.1
Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/gnash/gnash/ChangeLog,v
retrieving revision 1.4043
retrieving revision 1.4044
diff -u -b -r1.4043 -r1.4044
--- ChangeLog 20 Aug 2007 10:39:23 -0000 1.4043
+++ ChangeLog 20 Aug 2007 11:13:17 -0000 1.4044
@@ -1,9 +1,14 @@
-2007-08-19 Sandro Santilli <[EMAIL PROTECTED]>
+2007-08-20 Asger Ottar Alstrup <[EMAIL PROTECTED]>
+
+ * testsuite/misc-mtasc.all/: Makefile.am, exception.as:
+ Test for try/catch (gnash fails).
+
+2007-08-20 Sandro Santilli <[EMAIL PROTECTED]>
* testsuite/libbase/: TCXXRc.cpp, gnashrc.in:
Test 'set debuglog' directive.
-2007-08-19 Benjamin Wolsey <[EMAIL PROTECTED]>
+2007-08-20 Benjamin Wolsey <[EMAIL PROTECTED]>
* libbase/log.cpp: fix 'set debuglog' directive.
Index: testsuite/misc-mtasc.all/Makefile.am
===================================================================
RCS file: /sources/gnash/gnash/testsuite/misc-mtasc.all/Makefile.am,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -b -r1.13 -r1.14
--- testsuite/misc-mtasc.all/Makefile.am 28 Jul 2007 12:58:09 -0000
1.13
+++ testsuite/misc-mtasc.all/Makefile.am 20 Aug 2007 11:13:17 -0000
1.14
@@ -24,6 +24,7 @@
inheritance.as \
function.as \
enum.as \
+ exception.as \
levels.as \
$(NULL)
Index: testsuite/misc-mtasc.all/exception.as
===================================================================
RCS file: testsuite/misc-mtasc.all/exception.as
diff -N testsuite/misc-mtasc.all/exception.as
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ testsuite/misc-mtasc.all/exception.as 20 Aug 2007 11:13:17 -0000
1.1
@@ -0,0 +1,57 @@
+// exception.as - MTASC testcase for try/catch
+//
+// Copyright (C) 2005, 2006, 2007 Free Software Foundation, Inc.
+//
+// This program is free software; you can redistribute it and/or modify
+// it under the terms of the GNU General Public License as published by
+// the Free Software Foundation; either version 3 of the License, or
+// (at your option) any later version.
+//
+// This program is distributed in the hope that it will be useful,
+// but WITHOUT ANY WARRANTY; without even the implied warranty of
+// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+// GNU General Public License for more details.
+//
+// You should have received a copy of the GNU General Public License
+// along with this program; if not, write to the Free Software
+// Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+//
+//
+// Original author: Asger Ottar Alstrup <[EMAIL PROTECTED]>
+//
+
+#include "check.as"
+
+// This movie tests exceptions
+
+class Test
+{
+
+ // constructor
+ function Test()
+ {
+ note("Test constructor called");
+ }
+
+ function test_all()
+ {
+ var res;
+ try {
+ throw(1);
+ res = 0;
+ } catch (e) {
+ res = e;
+ }
+
+ xcheck_equals(res, 1);
+ }
+
+ static function main(mc)
+ {
+ var myTest = new Test;
+ myTest.test_all();
+
+ Dejagnu.done();
+ }
+
+}
_______________________________________________
Gnash-commit mailing list
Gnash-commit@gnu.org
http://lists.gnu.org/mailman/listinfo/gnash-commit
