Typo.

diff --git a/src/smpi/smpi_f77.c b/src/smpi/smpi_f77.c
index aa9af8c..95c40d7 100644 (file)
--- a/src/smpi/smpi_f77.c
+++ b/src/smpi/smpi_f77.c
@@ -28,7 +28,7 @@ union u_smpi_common {
     integer _MPI_STATUS_IGNORE;
     integer _MPI_STATUSES_IGNORE;
   } *f77;                       /* with f2c, remains NULL with gfortran */
-  struct s_smpi_common f90;     /* with gftortran */
+  struct s_smpi_common f90;     /* with gfortran */
 } smpi_ = { NULL };
 
 /* Convert between Fortran and C */