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