diff options
| author | pault <pault@138bc75d-0d04-0410-961f-82ee72b054a4> | 2016-09-22 11:26:59 +0000 |
|---|---|---|
| committer | pault <pault@138bc75d-0d04-0410-961f-82ee72b054a4> | 2016-09-22 11:26:59 +0000 |
| commit | 6c935e16054c0749f913659d928bb20648a538f7 (patch) | |
| tree | 9b6f3986ccf569bca23281d89cc0f9230f8ef158 /gcc/fortran/interface.c | |
| parent | 51c846d6075dd988d52542206d4e3c9fbed7b1f7 (diff) | |
2016-09-22 Paul Thomas <pault@gcc.gnu.org>
PR fortran/48298
* gfortran.h : Place the pseudo operators INTRINSIC_FORMATTED
and INTRINSIC_UNFORMATTED after the sentinel in enum
gfc_intrinsic_op so that they do not appear as place holders
in module_write.
* interface.c (dtio_op): Comment on the special nature of the
pseudo operators INTRINSIC FORMATTED and INTRINSIC_UNFORMATTED.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@240349 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/interface.c')
| -rw-r--r-- | gcc/fortran/interface.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/gcc/fortran/interface.c b/gcc/fortran/interface.c index 09f5a539e7c4..9a19fa731b0c 100644 --- a/gcc/fortran/interface.c +++ b/gcc/fortran/interface.c @@ -115,7 +115,9 @@ fold_unary_intrinsic (gfc_intrinsic_op op) } -/* Return the operator depending on the DTIO moded string. */ +/* Return the operator depending on the DTIO moded string. Note that + these are not operators in the normal sense and so have been placed + beyond GFC_INTRINSIC_END in gfortran.h:enum gfc_intrinsic_op. */ static gfc_intrinsic_op dtio_op (char* mode) |