diff options
| author | Tobias Burnus <burnus@gcc.gnu.org> | 2007-10-31 16:10:12 +0100 |
|---|---|---|
| committer | Tobias Burnus <burnus@gcc.gnu.org> | 2007-10-31 16:10:12 +0100 |
| commit | 1e4c40729a2606b0b3cd7993d9f6faac7ca1506b (patch) | |
| tree | ef12b1b4fe237e820892760c288137f83de1be2b /gcc/fortran/module.c | |
| parent | 5b9a40df4e3e9c4253239bbc32578eda155577ea (diff) | |
| download | gcc-1e4c40729a2606b0b3cd7993d9f6faac7ca1506b.zip gcc-1e4c40729a2606b0b3cd7993d9f6faac7ca1506b.tar.gz gcc-1e4c40729a2606b0b3cd7993d9f6faac7ca1506b.tar.bz2 | |
[multiple changes]
2007-10-31 Tobias Burnus <burnus@net-b.de>
PR fortran/33941
* modules.c (intrinsics): Use only alphabetic names for
intrinsic operators.
2007-10-31 Dominique d'Humieres <dominiq@lps.ens.fr>
Tobias Burnus <burnus@net-b.de>
PR fortran/33941
* gfortran.dg/module_read_1.f90: New.
From-SVN: r129801
Diffstat (limited to 'gcc/fortran/module.c')
| -rw-r--r-- | gcc/fortran/module.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/gcc/fortran/module.c b/gcc/fortran/module.c index 12c4516..a05437a 100644 --- a/gcc/fortran/module.c +++ b/gcc/fortran/module.c @@ -2627,17 +2627,17 @@ static const mstring intrinsics[] = minit ("OR", INTRINSIC_OR), minit ("EQV", INTRINSIC_EQV), minit ("NEQV", INTRINSIC_NEQV), - minit ("==", INTRINSIC_EQ), + minit ("EQ_SIGN", INTRINSIC_EQ), minit ("EQ", INTRINSIC_EQ_OS), - minit ("/=", INTRINSIC_NE), + minit ("NE_SIGN", INTRINSIC_NE), minit ("NE", INTRINSIC_NE_OS), - minit (">", INTRINSIC_GT), + minit ("GT_SIGN", INTRINSIC_GT), minit ("GT", INTRINSIC_GT_OS), - minit (">=", INTRINSIC_GE), + minit ("GE_SIGN", INTRINSIC_GE), minit ("GE", INTRINSIC_GE_OS), - minit ("<", INTRINSIC_LT), + minit ("LT_SIGN", INTRINSIC_LT), minit ("LT", INTRINSIC_LT_OS), - minit ("<=", INTRINSIC_LE), + minit ("LE_SIGN", INTRINSIC_LE), minit ("LE", INTRINSIC_LE_OS), minit ("NOT", INTRINSIC_NOT), minit ("PARENTHESES", INTRINSIC_PARENTHESES), |