[petsc-dev] openmp

[Svetlana Tkachenko]

On Thu, 7 Nov 2013, at 12:56, Jed Brown wrote:
> Svetlana Tkachenko <svetlana.tkachenko at fastmail.fm> writes:
> 
> > ~/dev/test/petsc $ mv solver.f solver.F
> > ~/dev/test/petsc $ make
> > gfortran -c  -fPIC -Wall -Wno-unused-variable -g  -fopenmp  -I/home/<username>/petsc/include -I/home/<username>/petsc/linux-amd64/include -I/home/<username>/petsc/include/mpiuni    -o solver.o solver.F
> > solver.F:8.46:
> >
> >               if (ierr .ne. 0) call MPI_Abort(PETSC_COMM_WORLD,ierr,ierr
> >                                               1
> > Error: Missing ')' in statement at or before (1)
> 
> You indented so far that the expanded macro spilled over the
> 72-character line length needed to fit on a punch card in the 1950s.  If
> you would like to modernize your Fortran dialect beyond the constraints
> of punch cards, you could consider naming your file .F90 or adding the
> option -ffree-form, perhaps also with -ffree-line-length-none.
>

For the bigger (non-test) project, I would really make use of --free-whatever options you gave. But simply writing "prog: prog.o foo.o ${FLINKER} -ffree-form -o $@ $^ ${PETSC_LIB}", and looking at 'make' output, shows that it ignored my lines entirely and keeps trying to compile without -ffree-form.