1 1.1.1.3 mrg /* Copyright (C) 2005-2022 Free Software Foundation, Inc. 2 1.1 mrg 3 1.1 mrg This file is part of GCC. 4 1.1 mrg 5 1.1 mrg GCC is free software; you can redistribute it and/or modify it under 6 1.1 mrg the terms of the GNU General Public License as published by the Free 7 1.1 mrg Software Foundation; either version 3, or (at your option) any later 8 1.1 mrg version. 9 1.1 mrg 10 1.1 mrg GCC is distributed in the hope that it will be useful, but WITHOUT ANY 11 1.1 mrg WARRANTY; without even the implied warranty of MERCHANTABILITY or 12 1.1 mrg FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 13 1.1 mrg for more details. 14 1.1 mrg 15 1.1 mrg You should have received a copy of the GNU General Public License 16 1.1 mrg along with GCC; see the file COPYING3. If not see 17 1.1 mrg <http://www.gnu.org/licenses/>. */ 18 1.1 mrg 19 1.1 mrg /* Make sure to keep in sync with libgfortran/io/io.h (st_parameter_*). */ 20 1.1 mrg #ifndef IOPARM_common_libreturn_mask 21 1.1 mrg #define IOPARM_common_libreturn_mask 3 22 1.1 mrg #define IOPARM_common_libreturn_ok 0 23 1.1 mrg #define IOPARM_common_libreturn_error 1 24 1.1 mrg #define IOPARM_common_libreturn_end 2 25 1.1 mrg #define IOPARM_common_libreturn_eor 3 26 1.1 mrg #define IOPARM_common_err (1 << 2) 27 1.1 mrg #define IOPARM_common_end (1 << 3) 28 1.1 mrg #define IOPARM_common_eor (1 << 4) 29 1.1 mrg #endif 30 1.1 mrg IOPARM (common, flags, 0, int4) 31 1.1 mrg IOPARM (common, unit, 0, int4) 32 1.1 mrg IOPARM (common, filename, 0, pchar) 33 1.1 mrg IOPARM (common, line, 0, int4) 34 1.1 mrg IOPARM (common, iomsg, 1 << 6, char2) 35 1.1 mrg IOPARM (common, iostat, 1 << 5, pint4) 36 1.1 mrg IOPARM (open, common, 0, common) 37 1.1 mrg IOPARM (open, recl_in, 1 << 7, intio) 38 1.1 mrg IOPARM (open, file, 1 << 8, char2) 39 1.1 mrg IOPARM (open, status, 1 << 9, char1) 40 1.1 mrg IOPARM (open, access, 1 << 10, char2) 41 1.1 mrg IOPARM (open, form, 1 << 11, char1) 42 1.1 mrg IOPARM (open, blank, 1 << 12, char2) 43 1.1 mrg IOPARM (open, position, 1 << 13, char1) 44 1.1 mrg IOPARM (open, action, 1 << 14, char2) 45 1.1 mrg IOPARM (open, delim, 1 << 15, char1) 46 1.1 mrg IOPARM (open, pad, 1 << 16, char2) 47 1.1 mrg IOPARM (open, convert, 1 << 17, char1) 48 1.1 mrg IOPARM (open, decimal, 1 << 18, char2) 49 1.1 mrg IOPARM (open, encoding, 1 << 19, char1) 50 1.1 mrg IOPARM (open, round, 1 << 20, char2) 51 1.1 mrg IOPARM (open, sign, 1 << 21, char1) 52 1.1 mrg IOPARM (open, asynchronous, 1 << 22, char2) 53 1.1 mrg IOPARM (open, newunit, 1 << 23, pint4) 54 1.1 mrg IOPARM (open, readonly, 1 << 24, int4) 55 1.1 mrg IOPARM (open, cc, 1 << 25, char2) 56 1.1 mrg IOPARM (open, share, 1 << 26, char1) 57 1.1 mrg IOPARM (close, common, 0, common) 58 1.1 mrg IOPARM (close, status, 1 << 7, char1) 59 1.1 mrg IOPARM (filepos, common, 0, common) 60 1.1 mrg IOPARM (inquire, common, 0, common) 61 1.1 mrg IOPARM (inquire, exist, 1 << 7, pint4) 62 1.1 mrg IOPARM (inquire, opened, 1 << 8, pint4) 63 1.1 mrg IOPARM (inquire, number, 1 << 9, pint4) 64 1.1 mrg IOPARM (inquire, named, 1 << 10, pint4) 65 1.1 mrg IOPARM (inquire, nextrec, 1 << 11, pintio) 66 1.1 mrg IOPARM (inquire, recl_out, 1 << 12, pintio) 67 1.1 mrg IOPARM (inquire, strm_pos_out, 1 << 13, pintio) 68 1.1 mrg IOPARM (inquire, file, 1 << 14, char1) 69 1.1 mrg IOPARM (inquire, access, 1 << 15, char2) 70 1.1 mrg IOPARM (inquire, form, 1 << 16, char1) 71 1.1 mrg IOPARM (inquire, blank, 1 << 17, char2) 72 1.1 mrg IOPARM (inquire, position, 1 << 18, char1) 73 1.1 mrg IOPARM (inquire, action, 1 << 19, char2) 74 1.1 mrg IOPARM (inquire, delim, 1 << 20, char1) 75 1.1 mrg IOPARM (inquire, pad, 1 << 21, char2) 76 1.1 mrg IOPARM (inquire, name, 1 << 22, char1) 77 1.1 mrg IOPARM (inquire, sequential, 1 << 23, char2) 78 1.1 mrg IOPARM (inquire, direct, 1 << 24, char1) 79 1.1 mrg IOPARM (inquire, formatted, 1 << 25, char2) 80 1.1 mrg IOPARM (inquire, unformatted, 1 << 26, char1) 81 1.1 mrg IOPARM (inquire, read, 1 << 27, char2) 82 1.1 mrg IOPARM (inquire, write, 1 << 28, char1) 83 1.1 mrg IOPARM (inquire, readwrite, 1 << 29, char2) 84 1.1 mrg IOPARM (inquire, convert, 1 << 30, char1) 85 1.1 mrg IOPARM (inquire, flags2, 1U << 31, int4) 86 1.1 mrg IOPARM (inquire, asynchronous, 1 << 0, char1) 87 1.1 mrg IOPARM (inquire, decimal, 1 << 1, char2) 88 1.1 mrg IOPARM (inquire, encoding, 1 << 2, char1) 89 1.1 mrg IOPARM (inquire, round, 1 << 3, char2) 90 1.1 mrg IOPARM (inquire, sign, 1 << 4, char1) 91 1.1 mrg IOPARM (inquire, pending, 1 << 5, pint4) 92 1.1 mrg IOPARM (inquire, size, 1 << 6, pintio) 93 1.1 mrg IOPARM (inquire, id, 1 << 7, pint4) 94 1.1 mrg IOPARM (inquire, iqstream, 1 << 8, char1) 95 1.1 mrg IOPARM (inquire, share, 1 << 9, char2) 96 1.1 mrg IOPARM (inquire, cc, 1 << 10, char1) 97 1.1 mrg IOPARM (wait, common, 0, common) 98 1.1 mrg IOPARM (wait, id, 1 << 7, pint4) 99 1.1 mrg IOPARM (dt, common, 0, common) 100 1.1 mrg #define IOPARM_dt_list_format (1 << 7) 101 1.1 mrg #define IOPARM_dt_namelist_read_mode (1 << 8) 102 1.1 mrg IOPARM (dt, rec, 1 << 9, intio) 103 1.1 mrg IOPARM (dt, size, 1 << 10, pintio) 104 1.1 mrg IOPARM (dt, iolength, 1 << 11, pintio) 105 1.1 mrg IOPARM (dt, internal_unit_desc, 0, parray) 106 1.1 mrg IOPARM (dt, format, 1 << 12, char1) 107 1.1 mrg IOPARM (dt, advance, 1 << 13, char2) 108 1.1 mrg IOPARM (dt, internal_unit, 1 << 14, char1) 109 1.1 mrg IOPARM (dt, namelist_name, 1 << 15, char2) 110 1.1 mrg IOPARM (dt, id, 1 << 16, pint4) 111 1.1 mrg IOPARM (dt, pos, 1 << 17, intio) 112 1.1 mrg IOPARM (dt, asynchronous, 1 << 18, char1) 113 1.1 mrg IOPARM (dt, blank, 1 << 19, char2) 114 1.1 mrg IOPARM (dt, decimal, 1 << 20, char1) 115 1.1 mrg IOPARM (dt, delim, 1 << 21, char2) 116 1.1 mrg IOPARM (dt, pad, 1 << 22, char1) 117 1.1 mrg IOPARM (dt, round, 1 << 23, char2) 118 1.1 mrg IOPARM (dt, sign, 1 << 24, char1) 119 1.1 mrg #define IOPARM_dt_f2003 (1 << 25) 120 1.1 mrg #define IOPARM_dt_dtio (1 << 26) 121 1.1 mrg #define IOPARM_dt_dec_ext (1 << 27) 122 1.1 mrg IOPARM (dt, u, 0, pad) 123
Indexes created Tue Oct 27 00:25:24 UTC 2026