| /dports/math/libpgmath/flang-d07daf3/runtime/flang/ |
| H A D | unf.c | 420 ENTF90IO(UNF_INIT, unf_init) in ENTF90IO() function
587 ENTF90IO(UNF_READA, unf_reada) in ENTF90IO() function
613 ENTF90IO(UNF_READ, unf_read) in ENTF90IO() function
729 ENTF90IO(BYTE_READ, byte_read) in ENTF90IO() function
986 ENTF90IO(UNF_WRITE, unf_write) in ENTF90IO() function
1331 ENTF90IO(UNF_END, unf_end)() in ENTF90IO() function
1407 ENTF90IO(USW_INIT, usw_init) in ENTF90IO() function
1570 ENTF90IO(USW_READA, usw_reada) in ENTF90IO() function
1596 ENTF90IO(USW_READ, usw_read) in ENTF90IO() function
1895 ENTF90IO(USW_WRITE, usw_write) in ENTF90IO() function
[all …]
|
| H A D | ldwrite.c | 248 ENTF90IO(LDW_INIT, ldw_init) in ENTF90IO() function
269 ENTF90IO(PRINT_INIT, print_init) in ENTF90IO() function
381 ENTF90IO(LDW_INIT03, ldw_init03) in ENTF90IO() function
670 ENTF90IO(LDWA, ldwa) in ENTF90IO() function
686 ENTF90IO(LDW, ldw) in ENTF90IO() function
700 ENTF90IO(LDW_AA, ldw_aa) in ENTF90IO() function
716 ENTF90IO(LDW_A, ldw_a) in ENTF90IO() function
727 ENTF90IO(LDW64_AA, ldw64_aa) in ENTF90IO() function
743 ENTF90IO(LDW64_A, ldw64_a) in ENTF90IO() function
944 ENTF90IO(LDW_END, ldw_end)() in ENTF90IO() function
[all …]
|
| H A D | error.c | 644 void ENTF90IO(SRC_INFOA, src_info03a)( in ENTF90IO() function
656 void ENTF90IO(SRC_INFO, src_info03)( in ENTF90IO() function
664 void ENTF90IO(SRC_INFOXA, src_infox03a)( in ENTF90IO() function
676 void ENTF90IO(SRC_INFOX, src_infox03)( in ENTF90IO() function
722 void ENTF90IO(SRC_INFOA, src_infoa)( in ENTF90IO() function
733 void ENTF90IO(SRC_INFO, src_info)( in ENTF90IO() function
741 void ENTF90IO(SRC_INFOXA, src_infoxa)( in ENTF90IO() function
752 void ENTF90IO(SRC_INFOX, src_infox)( in ENTF90IO() function
805 void ENTF90IO(IOMSGA, iomsga)(DCHAR(msg) DCLEN64(msg)) in ENTF90IO() function
812 void ENTF90IO(IOMSG, iomsg)(DCHAR(msg) DCLEN(msg)) in ENTF90IO() function
[all …]
|
| H A D | csect.c | 30 void ENTF90IO(BEGIN, begin)() {} in ENTF90IO() function
32 void ENTF90IO(END, end)() {} in ENTF90IO() function
|
| H A D | open.c | 43 ENTF90IO(GET_NEWUNIT, get_newunit)() in ENTF90IO() function
563 ENTF90IO(OPENA, opena) ( in ENTF90IO() function
648 ENTF90IO(OPEN, open) ( in ENTF90IO() function
687 ENTF90IO(OPEN2003A, open2003a)( in ENTF90IO() function
772 ENTF90IO(OPEN2003, open2003)( in ENTF90IO() function
811 ENTF90IO(OPEN_CVTA, open_cvta) in ENTF90IO() function
839 ENTF90IO(OPEN_CVT, open_cvt) in ENTF90IO() function
848 ENTF90IO(OPEN_SHAREA, open_sharea) in ENTF90IO() function
867 ENTF90IO(OPEN_SHARE, open_share) in ENTF90IO() function
1098 ENTF90IO(OPEN03A, open03a)( in ENTF90IO() function
[all …]
|
| H A D | fmtwrite.c | 340 ENTF90IO(FMTW_INITA, fmtw_inita) in ENTF90IO() function
382 ENTF90IO(FMTW_INIT, fmtw_init) in ENTF90IO() function
399 ENTF90IO(FMTW_INIT03A, fmtw_init03a) in ENTF90IO() function
454 ENTF90IO(FMTW_INIT03, fmtw_init03) in ENTF90IO() function
519 ENTF90IO(FMTW_INITVA, fmtw_initva) in ENTF90IO() function
560 ENTF90IO(FMTW_INITV, fmtw_initv) in ENTF90IO() function
1034 ENTF90IO(FMT_WRITEA, fmt_writea) in ENTF90IO() function
1050 ENTF90IO(FMT_WRITE, fmt_write) in ENTF90IO() function
1065 ENTF90IO(FMT_WRITE_AA, fmt_write_aa) in ENTF90IO() function
1081 ENTF90IO(FMT_WRITE_A, fmt_write_a) in ENTF90IO() function
[all …]
|
| H A D | ldread.c | 387 ENTF90IO(LDR_INIT, ldr_init) in ENTF90IO() function
407 ENTF90IO(LDR_INIT03A, ldr_init03a) in ENTF90IO() function
468 ENTF90IO(LDR_INIT03, ldr_init03) in ENTF90IO() function
542 ENTF90IO(LDR_INTERN_INIT, ldr_intern_init) in ENTF90IO() function
704 ENTF90IO(LDRA, ldra) in ENTF90IO() function
736 ENTF90IO(LDR, ldr) in ENTF90IO() function
750 ENTF90IO(LDR_AA, ldr_aa) in ENTF90IO() function
782 ENTF90IO(LDR_A, ldr_a) in ENTF90IO() function
793 ENTF90IO(LDR64_AA, ldr64_aa) in ENTF90IO() function
826 ENTF90IO(LDR64_A, ldr64_a) in ENTF90IO() function
[all …]
|
| H A D | fmtread.c | 407 ENTF90IO(FMTR_INITA, fmtr_inita) in ENTF90IO() function
452 ENTF90IO(FMTR_INIT, fmtr_init) in ENTF90IO() function
528 ENTF90IO(FMTR_INIT03A, fmtr_init03a) in ENTF90IO() function
584 ENTF90IO(FMTR_INIT03, fmtr_init03) in ENTF90IO() function
711 ENTF90IO(FMTR_INITVA, fmtr_initva) in ENTF90IO() function
755 ENTF90IO(FMTR_INITV, fmtr_initv) in ENTF90IO() function
1345 ENTF90IO(FMT_READA, fmt_reada) in ENTF90IO() function
1378 ENTF90IO(FMT_READ, fmt_read) in ENTF90IO() function
1392 ENTF90IO(FMT_READ_AA, fmt_read_aa) in ENTF90IO() function
1425 ENTF90IO(FMT_READ_A, fmt_read_a) in ENTF90IO() function
[all …]
|
| H A D | close.c | 129 ENTF90IO(CLOSEA, closea) in ENTF90IO() function
152 ENTF90IO(CLOSE, close) in ENTF90IO() function
155 return ENTF90IO(CLOSEA, closea) (unit, bitv, iostat, CADR(status), in ENTF90IO()
|
| H A D | nmlwrite.c | 135 ENTF90IO(NMLW_INIT, nmlw_init)(__INT_T *unit, in ENTF90IO() function
150 ENTF90IO(NMLW_INIT03A, nmlw_init03a)(__INT_T *istat, in ENTF90IO() function
197 ENTF90IO(NMLW_INIT03, nmlw_init03)(__INT_T *istat, in ENTF90IO() function
205 return ENTF90IO(NMLW_INIT03A, nmlw_init03a)(istat, CADR(decimal), CADR(delim), in ENTF90IO()
253 ENTF90IO(NMLW_INTERN_INITA, nmlw_intern_inita)( in ENTF90IO() function
274 ENTF90IO(NMLW_INTERN_INIT, nmlw_intern_init)( in ENTF90IO() function
284 return ENTF90IO(NMLW_INTERN_INITA, nmlw_intern_inita)(CADR(cunit), rec_num, in ENTF90IO()
823 ENTF90IO(NML_WRITE, nml_write)(__INT_T *unit, /* unit number */ in ENTF90IO() function
859 ENTF90IO(NMLW, nmlw)(NML_GROUP *nmldesc) in ENTF90IO() function
899 ENTF90IO(NMLW_END, nmlw_end)() in ENTF90IO() function
|
| H A D | backspace.c | 140 ENTF90IO(BACKSPACE, backspace)(unit, bitv, iostat) __INT_T *unit;
165 ENTF90IO(SWBACKSPACE, swbackspace)(unit, bitv, iostat) __INT_T *unit;
|
| H A D | flush.c | 27 int ENTF90IO(FLUSH, flush)(unit, bitv, iostat) __INT_T *unit;
|
| H A D | wait.c | 34 ENTF90IO(WAIT, wait)(unit, bitv, iostat, id) __INT_T *unit; /* unit number */
|
| H A D | endfile.c | 48 ENTF90IO(ENDFILE, endfile)(unit, bitv, iostat) __INT_T *unit;
|
| H A D | encodefmt.c | 954 ENTF90IO(ENCODE_FMTA, encode_fmta) in ENTF90IO() function
979 ENTF90IO(ENCODE_FMT, encode_fmt) in ENTF90IO() function
985 return ENTF90IO(ENCODE_FMTA, encode_fmta) (kind, nelem, CADR(str), in ENTF90IO()
1020 ENTF90IO(ENCODE_FMTV, encode_fmtv) in ENTF90IO() function
|
| H A D | rewind.c | 80 ENTF90IO(REWIND, rewind)(__INT_T *unit, __INT_T *bitv, __INT_T *iostat) in ENTF90IO() function
|
| H A D | nmlread.c | 238 ENTF90IO(NMLR_INIT, nmlr_init)(__INT_T *unit, __INT_T *rec, __INT_T *bitv, in ENTF90IO() function
250 ENTF90IO(NMLR_INIT03A, nmlr_init03a)(__INT_T *istat, DCHAR(blank), in ENTF90IO() function
307 ENTF90IO(NMLR_INIT03, nmlr_init03)(__INT_T *istat, DCHAR(blank), in ENTF90IO() function
312 return ENTF90IO(NMLR_INIT03A, nmlr_init03a)(istat, CADR(blank), CADR(decimal), in ENTF90IO()
374 ENTF90IO(LDR_INTERN_INITA, nmlr_intern_inita)( in ENTF90IO() function
391 ENTF90IO(LDR_INTERN_INIT, nmlr_intern_init)( in ENTF90IO() function
398 return ENTF90IO(LDR_INTERN_INITA, nmlr_intern_init)(CADR(cunit), rec_num, in ENTF90IO()
574 ENTF90IO(NML_READ, nml_read)( __INT_T *unit, in ENTF90IO() function
615 ENTF90IO(NMLR, nmlr)(NML_GROUP *nmldesc) in ENTF90IO() function
2136 ENTF90IO(NMLR_END, nmlr_end)() in ENTF90IO() function
|
| H A D | inquire.c | 461 int ENTF90IO(INQUIREA, inquirea)( in ENTF90IO() function
791 int ENTF90IO(INQUIRE, inquire)( in ENTF90IO() function
820 int ENTF90IO(INQUIRE2003A, inquire2003a)( in ENTF90IO() function
1150 int ENTF90IO(INQUIRE2003, inquire2003)( in ENTF90IO() function
1464 ENTF90IO(INQUIRE2A, inquire2a) in ENTF90IO() function
1557 ENTF90IO(INQUIRE2, inquire2) in ENTF90IO() function
1564 return ENTF90IO(INQUIRE2A, inquire2a) (istat, id, pending, pos, size, in ENTF90IO()
1574 ENTF90IO(INQUIRE03A, inquire03a) ( in ENTF90IO() function
2047 ENTF90IO(INQUIRE03, inquire03) ( in ENTF90IO() function
2132 ENTF90IO(INQUIRE03_2A, inquire03_2a) in ENTF90IO() function
[all …]
|
| /dports/math/libpgmath/flang-d07daf3/runtime/include/ |
| H A D | FuncArgMacros.h | 33 #define ENTF90IO(UC, LC) pgf90io_##LC##_i8 macro
43 #define ENTF90IO(UC, LC) pgf90io_##LC macro
60 #define ENTF90IO(UC, LC) pgf90io_##LC macro
74 #define ENTF90IO(UC, LC) pgf90io_##LC macro
87 #define ENTF90IO(UC, LC) f90io_##LC##_i8 macro
97 #define ENTF90IO(UC, LC) f90io_##LC macro
|