| #ifndef IOPARM_common_libreturn_mask |
| #define IOPARM_common_libreturn_mask 3 |
| #define IOPARM_common_libreturn_ok 0 |
| #define IOPARM_common_libreturn_error 1 |
| #define IOPARM_common_libreturn_end 2 |
| #define IOPARM_common_libreturn_eor 3 |
| #define IOPARM_common_err (1 << 2) |
| #define IOPARM_common_end (1 << 3) |
| #define IOPARM_common_eor (1 << 4) |
| #endif |
| IOPARM (common, flags, 0, int4) |
| IOPARM (common, unit, 0, int4) |
| IOPARM (common, filename, 0, pchar) |
| IOPARM (common, line, 0, int4) |
| IOPARM (common, iomsg, 1 << 6, char2) |
| IOPARM (common, iostat, 1 << 5, pint4) |
| IOPARM (open, common, 0, common) |
| IOPARM (open, recl_in, 1 << 7, int4) |
| IOPARM (open, file, 1 << 8, char2) |
| IOPARM (open, status, 1 << 9, char1) |
| IOPARM (open, access, 1 << 10, char2) |
| IOPARM (open, form, 1 << 11, char1) |
| IOPARM (open, blank, 1 << 12, char2) |
| IOPARM (open, position, 1 << 13, char1) |
| IOPARM (open, action, 1 << 14, char2) |
| IOPARM (open, delim, 1 << 15, char1) |
| IOPARM (open, pad, 1 << 16, char2) |
| IOPARM (open, convert, 1 << 17, char1) |
| IOPARM (close, common, 0, common) |
| IOPARM (close, status, 1 << 7, char1) |
| IOPARM (filepos, common, 0, common) |
| IOPARM (inquire, common, 0, common) |
| IOPARM (inquire, exist, 1 << 7, pint4) |
| IOPARM (inquire, opened, 1 << 8, pint4) |
| IOPARM (inquire, number, 1 << 9, pint4) |
| IOPARM (inquire, named, 1 << 10, pint4) |
| IOPARM (inquire, nextrec, 1 << 11, pint4) |
| IOPARM (inquire, recl_out, 1 << 12, pint4) |
| IOPARM (inquire, strm_pos_out, 1 << 13, pintio) |
| IOPARM (inquire, file, 1 << 14, char1) |
| IOPARM (inquire, access, 1 << 15, char2) |
| IOPARM (inquire, form, 1 << 16, char1) |
| IOPARM (inquire, blank, 1 << 17, char2) |
| IOPARM (inquire, position, 1 << 18, char1) |
| IOPARM (inquire, action, 1 << 19, char2) |
| IOPARM (inquire, delim, 1 << 20, char1) |
| IOPARM (inquire, pad, 1 << 21, char2) |
| IOPARM (inquire, name, 1 << 22, char1) |
| IOPARM (inquire, sequential, 1 << 23, char2) |
| IOPARM (inquire, direct, 1 << 24, char1) |
| IOPARM (inquire, formatted, 1 << 25, char2) |
| IOPARM (inquire, unformatted, 1 << 26, char1) |
| IOPARM (inquire, read, 1 << 27, char2) |
| IOPARM (inquire, write, 1 << 28, char1) |
| IOPARM (inquire, readwrite, 1 << 29, char2) |
| IOPARM (inquire, convert, 1 << 30, char1) |
| #ifndef IOPARM_dt_list_format |
| #define IOPARM_dt_list_format (1 << 7) |
| #define IOPARM_dt_namelist_read_mode (1 << 8) |
| #endif |
| IOPARM (dt, common, 0, common) |
| IOPARM (dt, rec, 1 << 9, intio) |
| IOPARM (dt, size, 1 << 10, pint4) |
| IOPARM (dt, iolength, 1 << 11, pint4) |
| IOPARM (dt, internal_unit_desc, 0, parray) |
| IOPARM (dt, format, 1 << 12, char1) |
| IOPARM (dt, advance, 1 << 13, char2) |
| IOPARM (dt, internal_unit, 1 << 14, char1) |
| IOPARM (dt, namelist_name, 1 << 15, char2) |
| IOPARM (dt, u, 0, pad) |
