diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2010-10-19 01:28:50 +0000 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2010-10-19 01:28:50 +0000 |
| commit | a11930ba8d19cc26848dc06d4a2571642af735b9 (patch) | |
| tree | 57b515208fe72f75dd40e6e639f1fde700dcf61a /gcc/fortran/libgfortran.h | |
| parent | 21016e43e2ead79d6dec8827a8c66339f467813b (diff) | |
| download | gcc-a11930ba8d19cc26848dc06d4a2571642af735b9.zip gcc-a11930ba8d19cc26848dc06d4a2571642af735b9.tar.gz gcc-a11930ba8d19cc26848dc06d4a2571642af735b9.tar.bz2 | |
io.h: Remove definition of the BT enumerator.
2010-10-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
* io/io.h: Remove definition of the BT enumerator.
* libgfortran.h: Replace GFC_DTYPE enumerator with BT.
* intrinsics/iso_c_generated_procs.c: Likewise
* intrinsics/date_and_time.c: Likewise.
* intrinsics/iso_c_binding.c: Likewise.
* io/list_read.c: Likewise.
* io/transfer.c: Likewise.
* io/write.c: Likewise.
2010-10-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
* gfortran.h: Remove definition of bt enumerator.
* libgfortran.h: Add bt enumerator type alighned with defintion.
Remove the dtype enumerator, no longer used.
previously given in libgfortran/io.h
* trans-types.c: Use new bt enumerator.
* trans-io.c: Likewise.
From-SVN: r165675
Diffstat (limited to 'gcc/fortran/libgfortran.h')
| -rw-r--r-- | gcc/fortran/libgfortran.h | 17 |
1 files changed, 6 insertions, 11 deletions
diff --git a/gcc/fortran/libgfortran.h b/gcc/fortran/libgfortran.h index e26cbf9..85a73d8 100644 --- a/gcc/fortran/libgfortran.h +++ b/gcc/fortran/libgfortran.h @@ -122,16 +122,11 @@ libgfortran_stat_codes; #define GFC_DTYPE_TYPE_MASK 0x38 #define GFC_DTYPE_SIZE_SHIFT 6 +/* Basic types. BT_VOID is used by ISO C Binding so funcs like c_f_pointer + can take any arg with the pointer attribute as a param. These are also + used in the run-time library for IO. */ typedef enum -{ - GFC_DTYPE_UNKNOWN = 0, - GFC_DTYPE_INTEGER, - /* TODO: recognize logical types. */ - GFC_DTYPE_LOGICAL, - GFC_DTYPE_REAL, - GFC_DTYPE_COMPLEX, - GFC_DTYPE_DERIVED, - GFC_DTYPE_CHARACTER +{ BT_UNKNOWN = 0, BT_INTEGER, BT_LOGICAL, BT_REAL, BT_COMPLEX, + BT_DERIVED, BT_CHARACTER, BT_CLASS, BT_PROCEDURE, BT_HOLLERITH, BT_VOID } -dtype; - +bt; |