From: fxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Sat, 20 Jan 2007 13:01:08 +0000 (+0000)
Subject: 	PR fortran/30446
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=3dc083cefa607b23e8a3b8295313acd1570a789d;p=thirdparty%2Fgcc.git

	PR fortran/30446
	* options.c (gfc_handle_module_path_options): Path used in -J
	option is now added to the module search path.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@121000 138bc75d-0d04-0410-961f-82ee72b054a4
---

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index d33233f94484..99a39b23a2a0 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,9 @@
+2007-01-20  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
+
+	PR fortran/30446
+	* options.c (gfc_handle_module_path_options): Path used in -J
+	option is now added to the module search path.
+
 2007-01-20  Richard Guenther  <rguenther@suse.de>
 
 	PR fortran/30223
diff --git a/gcc/fortran/options.c b/gcc/fortran/options.c
index cd937da8751e..aa1a9404cc23 100644
--- a/gcc/fortran/options.c
+++ b/gcc/fortran/options.c
@@ -345,6 +345,8 @@ gfc_handle_module_path_options (const char *arg)
   gfc_option.module_dir = (char *) gfc_getmem (strlen (arg) + 2);
   strcpy (gfc_option.module_dir, arg);
   strcat (gfc_option.module_dir, "/");
+
+  gfc_add_include_path (gfc_option.module_dir, true);
 }
 
 static void