Hello world,
the attached patch fixes the PR by (re-)adding a search path
for the path used by intrinsic modules.
Regression-tested. OK for trunk?
Thomas
2013-02-08 Thomas Koenig <[email protected]>
PR fortran/56224
* options.c (gfc_handle_option): Also call
gfc_add_include_path for intrinsic modules.
2013-02-08 Thomas Koenig <[email protected]>
PR fortran/56224
* gfortran.dg/gomp/omp_lib_1.F: New test.
* gfortran.dg/gomp/omp_lib_2.f: New test.
Index: options.c
===================================================================
--- options.c (Revision 195686)
+++ options.c (Arbeitskopie)
@@ -844,6 +844,11 @@ gfc_handle_option (size_t scode, const char *arg,
case OPT_fintrinsic_modules_path:
case OPT_fintrinsic_modules_path_:
+
+ /* FIXME: This is needed because omp_lib.h is in a
+ directory together with intrinsic modules. */
+ gfc_add_include_path (arg, false, false);
+
gfc_add_intrinsic_modules_path (arg);
break;
C { dg-do compile }
#include "omp_lib.h"
END
C { dg-do compile }
include 'omp_lib.h'
END
