diff options
| author | Thomas Koenig <tkoenig@gcc.gnu.org> | 2024-10-11 22:58:51 +0200 |
|---|---|---|
| committer | Thomas Koenig <tkoenig@gcc.gnu.org> | 2024-10-11 23:03:11 +0200 |
| commit | 54b3f8e7bc0b572c1966aece20a0ac942aa4af97 (patch) | |
| tree | fae1d5bec00efcf7b4bb568ae642e7de9c5bc228 /gcc/fortran/libgfortran.h | |
| parent | c92477e00068811be31c18428904e0d585fa5236 (diff) | |
| download | gcc-54b3f8e7bc0b572c1966aece20a0ac942aa4af97.zip gcc-54b3f8e7bc0b572c1966aece20a0ac942aa4af97.tar.gz gcc-54b3f8e7bc0b572c1966aece20a0ac942aa4af97.tar.bz2 | |
Introduce GFC_STD_UNSIGNED.
This patch creates an unsigned "standard" for the
gfc_option.allow_std field.
One of the main reason why people want UNSIGNED for Fortran is
interfacing for C.
This is a preparation for further work on the ISO_C_BINDING constants.
That, we do via iso-c-binding.def , whose last field is a standard
for the constant to be defined for the standard in question, which is
then checked. I could try and invent a different method for this,
but I'd rather not.
gcc/fortran/ChangeLog:
* intrinsic.cc (add_functions): Convert uint and
selected_unsigned_kind to GFC_STD_UNSIGNED.
(gfc_check_intrinsic_standard): Handle GFC_STD_UNSIGNED.
* libgfortran.h (GFC_STD_UNSIGNED): Add.
* options.cc (gfc_post_options): Set GFC_STD_UNSIGNED
if -funsigned is set.
Diffstat (limited to 'gcc/fortran/libgfortran.h')
| -rw-r--r-- | gcc/fortran/libgfortran.h | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/fortran/libgfortran.h b/gcc/fortran/libgfortran.h index 895629d..773f2a0 100644 --- a/gcc/fortran/libgfortran.h +++ b/gcc/fortran/libgfortran.h @@ -23,6 +23,8 @@ along with GCC; see the file COPYING3. If not see Nevertheless, some features available in F2018 are prohibited in F2023. Please remember to keep those definitions in sync with gfortran.texi. */ +#define GFC_STD_UNSIGNED (1<<14) /* Not really a standard, but + better for error handling. */ #define GFC_STD_F2023_DEL (1<<13) /* Prohibited in F2023. */ #define GFC_STD_F2023 (1<<12) /* New in F2023. */ #define GFC_STD_F2018_DEL (1<<11) /* Deleted in F2018. */ |