This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: '!$OMP' directive followed by several spaces
On Wed, Feb 14, 2007 at 01:29:47PM +0100, Philippe Schaffnit wrote:
>
>Hi!
>
>No this happens under Linux (I haven't tried any other machine yet).
>
>This is indeed with libgomp/testsuite/libgomp.fortran/do1.f90:
>
>diff do1.f90 .../Gcc_Sources/libgomp/testsuite/libgomp.fortran/
>23c23
>< !$omp do
>---
>> !$omp do
>
>Leads to:
>gfortran -fopenmp do1.f90
>do1.f90:23.6:
>
>!$omp do
> 1
>Error: Unclassifiable OpenMP directive at (1)
>
>This must have to do with my local setup then... Can anyone reproduce
>it?
Yes, i can reproduce this.
This makes it go away..
Index: gcc-4.2/gcc/fortran/parse.c
===================================================================
--- gcc-4.2/gcc/fortran/parse.c (revision 121841)
+++ gcc-4.2/gcc/fortran/parse.c (working copy)
@@ -479,6 +479,7 @@ next_free (void)
gcc_assert (c == "!$omp"[i]);
gcc_assert (c == ' ');
+ gfc_gobble_whitespace ();
return decode_omp_directive ();
}
}