diff options
author | Jakub Jelinek <jakub@redhat.com> | 2013-01-16 17:19:32 +0100 |
---|---|---|
committer | Tobias Burnus <burnus@gcc.gnu.org> | 2013-01-16 17:19:32 +0100 |
commit | f34dea03005c1cddd28e8bca73dffb4b05c1aff7 (patch) | |
tree | 01ec34d353e480634b43f6d1155cad92fddf628d /gcc/fortran/options.c | |
parent | 8c01de7fb34ae3d5fbedc3377cf431aa34ebca64 (diff) | |
download | gcc-f34dea03005c1cddd28e8bca73dffb4b05c1aff7.zip gcc-f34dea03005c1cddd28e8bca73dffb4b05c1aff7.tar.gz gcc-f34dea03005c1cddd28e8bca73dffb4b05c1aff7.tar.bz2 |
re PR driver/55884 (FAIL: libgomp.fortran/omp_parse3.f90 -O0 (test for excess errors))
gcc/fortran/
2013-01-16 Jakub Jelinek <jakub@redhat.com>
Tobias Burnus <burnus@net-b.de>
PR driver/55884
* lang.opt (fintrinsic-modules-path): Don't accept Joined.
(fintrinsic-modules-path=): New.
* options.c (gfc_handle_option, gfc_get_option_string,
gfc_get_option_string): Handle the latter.
libgomp/
2013-01-16 Jakub Jelinek <jakub@redhat.com>
Tobias Burnus <burnus@net-b.de>
PR driver/55884
* testsuite/libgomp.fortran/fortran.exp: Use
-fintrinsic-modules-path= instead of
-fintrinsic-modules-path.
Co-Authored-By: Tobias Burnus <burnus@net-b.de>
From-SVN: r195242
Diffstat (limited to 'gcc/fortran/options.c')
-rw-r--r-- | gcc/fortran/options.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/gcc/fortran/options.c b/gcc/fortran/options.c index b1317ba..a014634 100644 --- a/gcc/fortran/options.c +++ b/gcc/fortran/options.c @@ -843,6 +843,7 @@ gfc_handle_option (size_t scode, const char *arg, int value, break; case OPT_fintrinsic_modules_path: + case OPT_fintrinsic_modules_path_: gfc_add_intrinsic_modules_path (arg); break; @@ -1146,6 +1147,7 @@ gfc_get_option_string (void) case OPT_quiet: case OPT_version: case OPT_fintrinsic_modules_path: + case OPT_fintrinsic_modules_path_: /* Ignore these. */ break; default: @@ -1171,6 +1173,7 @@ gfc_get_option_string (void) case OPT_quiet: case OPT_version: case OPT_fintrinsic_modules_path: + case OPT_fintrinsic_modules_path_: /* Ignore these. */ continue; |