Babel : le préprocesseur

L'option -WF du système de compilation Fortran permet la transmission d'options à la composante préprocesseur cpp. Le fichier source devra alors être suffixé par l'un des suffixes .F03, .F95, .F90 ou bien .F. L'option -qsuffix=cpp=suffixe permet de spécifier tout autre suffixe.

Voici un exemple :

Babel : mpixlf90_r -WF,-DDIM=5,-DDOUBLE source_cpp.F90
Babel : mpixlf90_r -qsuffix=cpp=f90 -WF,-DDIM=5,-DDOUBLE source_cpp.f90
Babel : cat source_cpp.F90
#define VAL 1.
#ifdef DOUBLE
#  define MYKIND 8
#else
#  define MYKIND 4
#endif
  program trucc
   implicit none
   real(kind=MYKIND),dimension(DIM) :: tab
   tab(:)=VAL
   print *, kind(tab)
   print *, tab
  end program trucc