===== mysql-test/mysql-test-run.pl 1.275 vs edited =====
Index: ndb-work/mysql-test/mysql-test-run.pl
===================================================================
--- ndb-work.orig/mysql-test/mysql-test-run.pl	2007-05-11 08:13:49.350173500 +0200
+++ ndb-work/mysql-test/mysql-test-run.pl	2007-05-15 14:27:30.332694250 +0200
@@ -286,6 +286,7 @@ our $opt_udiff;
 
 our $opt_skip_ndbcluster= 0;
 our $opt_skip_ndbcluster_slave= 0;
+our $opt_use_ndbcluster= 0;
 our $opt_with_ndbcluster= 0;
 our $opt_with_ndbcluster_only= 0;
 our $glob_ndbcluster_supported= 0;
@@ -435,7 +436,7 @@ sub main () {
     }
 
     # Check if cluster can be skipped
-    if ( !$need_ndbcluster )
+    if ( !$need_ndbcluster && !$opt_use_ndbcluster)
     {
       $opt_skip_ndbcluster= 1;
       $opt_skip_ndbcluster_slave= 1;
@@ -523,6 +524,7 @@ sub command_line_setup () {
              'small-bench'              => \$opt_small_bench,
              'with-ndbcluster|ndb'      => \$opt_with_ndbcluster,
              'vs-config'            => \$opt_vs_config,
+	     'use-ndbcluster'           => \$opt_use_ndbcluster,
 
              # Control what test suites or cases to run
              'force'                    => \$opt_force,
@@ -4422,7 +4424,7 @@ sub run_testcase_start_servers($) {
   {
     if ( ! $opt_skip_ndbcluster and
 	 !$clusters->[0]->{'pid'} and
-	 $tinfo->{'ndb_test'} )
+	 $tinfo->{'ndb_test'} || $opt_use_ndbcluster)
     {
       # Test need cluster, cluster is not started, start it
       ndbcluster_start($clusters->[0], "");