[corlib] Add partial EncodingHelper type to let XI define its own default encoding...

[mono.git] / mcs / tools / scan-tests.pl

diff --git a/mcs/tools/scan-tests.pl b/mcs/tools/scan-tests.pl
index f5c60b5dee65fac1d1b3003ff570af1f11ef7dd5..5cb0f8625f5a1a55c58b320bd1a79ebb14b8edf1 100755 (executable)
--- a/mcs/tools/scan-tests.pl
+++ b/mcs/tools/scan-tests.pl
@@ -6,7 +6,7 @@ use Carp;
 my @allfiles;
 
 my @badsuites = qw[System\.Collections/HashtableTest System\.Collections/StackTest System\.Collections\.Specialized\.BasicOperationsTest];
-my @badtests = qw[PathTest:TestGetTempFileName XmlTextReaderTests:TestIsNameChar XmlTextReaderTests:TestIsFirstNameChar];
+my @badtests = qw[PathTest:TestGetTempFileName XmlTextReaderTests:TestIsNameChar XmlTextReaderTests:TestIsFirstNameChar ByteTest:TestParse];
 my @mapfiles = ('s,^MonoTests\.(.*)/,$1/,',
                's,^Ximian\.Mono\.Tests(.*)/,,',
                's,^System\.Net/,,',
@@ -106,6 +106,7 @@ foreach $alltest (@allfiles) {
     print qq[namespace $namespace\n\{\n];
     print qq[\tpublic class Run$suite : $suite\n\t\{\n];
     print qq[\t\tprotected override void RunTest ()\n\t\t\{\n];
+#    print qq[\t\t\tbool errorThrown = false;\n\n];
     my $test;
   testloop:
     foreach $test (@tests) {
@@ -116,8 +117,15 @@ foreach $alltest (@allfiles) {
        foreach $badtest (@badtests) {
            next testloop if $fullname =~ /$badtest/;
        }
+#      print qq[\t\t\ttry \{\n\t\t\t\t$test ();\n\t\t\t\} catch \{\n];
+#      print qq[\t\t\t\tConsole.WriteLine ("$namespace:$suite:$test failed");\n];
+#      print qq[\t\t\t\terrorThrown = true;\n];
+#      print qq[\t\t\t\}\n];
        print qq[\t\t\t$test ();\n];
+#      print qq[\t\t\tConsole.WriteLine ("$namespace:$suite:$test DONE");\n];
     }
+    print qq[\n];
+#    print qq[\t\t\tif (errorThrown)\n\t\t\t\tthrow new ArgumentException ();\n];
     print qq[\t\t\}\n\t\}\n];
     print qq[\}\n\n];
 }