From patchwork Fri Feb  8 20:48:29 2013
Content-Type: text/plain; charset="utf-8"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Subject: [Fortran] Fix PR 56224
Date: Fri, 08 Feb 2013 10:48:29 -0000
From: Thomas Koenig <tkoenig@netcologne.de>
X-Patchwork-Id: 219304
Message-Id: <5115649D.4080808@netcologne.de>
To: "fortran@gcc.gnu.org" <fortran@gcc.gnu.org>,
 gcc-patches <gcc-patches@gcc.gnu.org>

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  <tkoenig@gcc.gnu.org>

         PR fortran/56224
         * options.c (gfc_handle_option):  Also call
         gfc_add_include_path for intrinsic modules.

2013-02-08  Thomas Koenig  <tkoenig@gcc.gnu.org>

         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;