Remove duplicate test 85/12485/2
Sylvestre Ledru [Wed, 11 Sep 2013 09:31:43 +0000 (11:31 +0200)]
Change-Id: Id46578ca2a461490703c68b6c5e684039ecf0a86

scilab/modules/mpi/tests/unit_tests/mpi_Bcast.tst
scilab/modules/mpi/tests/unit_tests/mpi_bcast.tst [deleted file]

index 75d34b4..5b49ec8 100644 (file)
@@ -7,8 +7,6 @@
 //
 // <-- MPI TEST 4 -->
 //
-// This test sends 42 from the master with a broadcast.
-// All the nodes (including the server) check if we get the right value
 MPI_Init();
 rnk =    MPI_Comm_rank();
 sizeNodes =    MPI_Comm_size();
@@ -17,6 +15,7 @@ assert_checkequal(MPI_Comm_size(), 4);
 
 SLV = rnk;                // handy shortcuts, master is rank 0
 Master = ~ SLV;            // slaves are all other
+
 a=-1
 if Master
    // Declare a
@@ -24,7 +23,18 @@ if Master
 end
 b=MPI_Bcast(a, 0);
 assert_checkequal(b,42);
-MPI_Finalize();
 
-exit
+a2=-1
+
+if Master
+   // Declare a
+   a2=[2,2;3,2];
+
+end
+
+b2=MPI_Bcast(a2, 0);
+assert_checkequal(b2,[2,2;3,2]);
 
+
+MPI_Finalize();
+exit
\ No newline at end of file
diff --git a/scilab/modules/mpi/tests/unit_tests/mpi_bcast.tst b/scilab/modules/mpi/tests/unit_tests/mpi_bcast.tst
deleted file mode 100644 (file)
index dab85c5..0000000
+++ /dev/null
@@ -1,40 +0,0 @@
-// =============================================================================
-// Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
-// Copyright (C) 2010-2010 - DIGITEO - Sylvestre LEDRU
-//
-//  This file is distributed under the same license as the Scilab package.
-// =============================================================================
-//
-// <-- MPI TEST 4 -->
-//
-MPI_Init();
-rnk =    MPI_Comm_rank();
-sizeNodes =    MPI_Comm_size();
-
-assert_checkequal(MPI_Comm_size(), 4);
-
-SLV = rnk;                // handy shortcuts, master is rank 0
-Master = ~ SLV;            // slaves are all other
-
-a=-1
-if Master
-   // Declare a
-   a=42
-end
-b=MPI_Bcast(a, 0);
-assert_checkequal(b,42);
-
-a2=-1
-
-if Master
-   // Declare a
-   a2=[2,2;3,2];
-
-end
-
-b2=MPI_Bcast(a2, 0);
-assert_checkequal(b2,[2,2;3,2]);
-
-
-MPI_Finalize();
-exit