fortran 90 mex on Mac

I have some fortran 90 code and I have written a mex gateway function for it. Everything compiled and worked OK under Windows. Now I tried compiling on a mac and I run into some problems.

First hurdle was making mex work with the provided examples (yprimef.F). Thanks to some previous posts, after editing my mexopts.sh, I managed to compile and the example seems to work OK.

However, when I try to mex my .f90 files (which are in free-form source), I get the following:

Warning: FD_CVg.f90:1: Illegal preprocessor directive
Warning: FD_CVg.f90:56: Illegal preprocessor directive
Warning: FD_CVg.f90:67: Illegal preprocessor directive
FD_CVg.f90:17.6:

        MWPOINTER PLHS(*), PRHS(*)
        1
  Error: Unclassifiable statement at (1)
  FD_CVg.f90:27.6:

        MWPOINTER MXCREATEDOUBLEMATRIX, MXGETPR
        1
  Error: Unclassifiable statement at (1)
  FD_CVg.f90:32.6:

        MWSIZE MXGETM, MXGETN
        1
  Error: Unclassifiable statement at (1)
  FD_CVg.f90:41.6:

        MWPOINTER  tp,ndp,nap,edp,eap,eoxp,toxp,skindp,qfp,fmp,vgminp,    &
        1
  Error: Unclassifiable statement at (1)
  FD_CVg.f90:49.6:

        MWSIZE M, N, NEL
        1
  Error: Unclassifiable statement at (1)

... and so on ...

the lines 1, 56 and 67 that trigger warnings are:

#include <fintrf.h>
#if defined MSWIND
#endif

respectively.

Any suggestions how to fix that?

(Using gfortran with xcode 3.2 on Mac OS X 10.6.8 with 64 bit matlab)

Answer 1

[fabio freschi]

The preprocessor directives are not recognized. If your gfortran version supports the -cpp (C PreProcessor) flag, use it. Otherwise just change the file extension to F90 (uppercase F): the preprocessor is automatically invoked.

Fabio

[Petar Bakalov]

Hello,

I checked, and indeed, changing the extension to F90 allows the mex to compile. Many thanks for that!

However, when I call the mex function ML crashes. (In the meantime I tinkered further with my mexopts.sh file, and now also the example mex-function yprime causes ML to crash, even though it seems to compile fine.)

In any case, the original problem of the post is solved, and I will start another thread for the rest.

Answer 2

[James Tursa]

Is there a "/fixed" option (or similar) on the COMPFLAGS line in the mexopts file? If so, remove it. That is the typical problem with compiling free format source code on PC's. Don't know if this applies to mac or not.

Answer 3

[Petar Bakalov]

I looked for something of the kind in the mexopts.sh file, and also checked a few other options files in /Applications/MATLAB_R2011b.app/bin, but didn't find anything.

Further suggestions would be appreciated, as it would be somewhat tedious translating all the code to fixed form... (I assume that not only the gateway function, but also the subroutines called from it would have to be rewritten.)

Answer 4

[Petar Bakalov]

Thanks for the tip, Fabio. I will try this when I have the mac on Monday and let you know whether it worked out.