Skip to content

Commit 496a7bd

Browse files
committed
gen-mpi-sizeof: minor style change
Suggested by Paul Hargrove. (cherry picked from commit 0f3a3e5)
1 parent ee8ec56 commit 496a7bd

File tree

1 file changed

+1
-3
lines changed

1 file changed

+1
-3
lines changed

ompi/mpi/fortran/base/gen-mpi-sizeof.pl

Lines changed: 1 addition & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -227,9 +227,7 @@ sub output_file {
227227
! compiler to build Open MPI.\n\n";
228228

229229
if ($want_bodies) {
230-
my $name = "ompi_sad_panda";
231-
$name = "pompi_sad_panda"
232-
if ($pmpi_arg);
230+
my $name = $pmpi_arg ? "pompi_sad_panda" : "ompi_sad_panda";
233231
print OUT "!
234232
! Dummy subroutine, just so that there is *some* Fortran in this file
235233
! (this is defensive programming: since the Fortran compiler doesn't

0 commit comments

Comments
 (0)