re PR fortran/47472 (Rules printed by -M option contains duplicate slash when -J option is used)

2011-01-27  Tobias Burnus  <burnus@net-b.de>

        PR fortran/47472
        * options.c (gfc_handle_module_path_options): Save
        module path without trailing slash as include path.

From-SVN: r169323
This commit is contained in:
Tobias Burnus 2011-01-27 08:02:58 +01:00 committed by Tobias Burnus
parent 3de2811212
commit 22b00a9f06
2 changed files with 8 additions and 1 deletions

View file

@ -1,3 +1,9 @@
2011-01-27 Tobias Burnus <burnus@net-b.de>
PR fortran/47472
* options.c (gfc_handle_module_path_options): Save
module path without trailing slash as include path.
2011-01-25 Tobias Burnus <burnus@net-b.de>
PR fortran/47448

View file

@ -463,9 +463,10 @@ 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, false);
strcat (gfc_option.module_dir, "/");
}