| /dports/math/libpgmath/flang-d07daf3/runtime/flang/ |
| H A D | descIntrins.c | 97 (DCHAR(string), DCHAR(substring) DCLEN64(string) DCLEN64(substring)) in ENTFTN()
117 (DCHAR(string), DCHAR(substring) DCLEN(string) DCLEN(substring)) in ENTFTN()
126 (DCHAR(string), DCHAR(substring) DCLEN64(string) DCLEN64(substring)) in ENTFTN()
134 (DCHAR(string), DCHAR(substring) DCLEN(string) DCLEN(substring)) in ENTFTN()
162 (DCHAR(string), DCHAR(substring) DCLEN(string) DCLEN(substring)) in ENTFTN()
179 (DCHAR(string), DCHAR(substring) DCLEN(string) DCLEN(substring)) in ENTFTN()
240 (DCHAR(string) DCLEN(string), DCHAR(substring) DCLEN(substring)) in ENTFTN()
256 (DCHAR(string), DCHAR(substring) DCLEN(string) DCLEN(substring)) in ENTFTN()
272 (DCHAR(string) DCLEN(string), DCHAR(substring) DCLEN(substring)) in ENTFTN()
288 (DCHAR(string), DCHAR(substring) DCLEN(string) DCLEN(substring)) in ENTFTN()
[all …]
|
| H A D | inquire.c | 464 DCHAR(sequential), DCHAR(direct), DCHAR(form), DCHAR(formatted), in ENTF90IO()
466 DCHAR(position), DCHAR(action), DCHAR(read), DCHAR(write0), in ENTF90IO()
796 DCHAR(position), DCHAR(action), DCHAR(read), DCHAR(write0), in ENTF90IO()
825 DCHAR(position), DCHAR(action), DCHAR(read), DCHAR(write0), in ENTF90IO()
1155 DCHAR(position), DCHAR(action), DCHAR(read), DCHAR(write0), in ENTF90IO()
1182 DCHAR(position), DCHAR(action), DCHAR(read), DCHAR(write0), in ENTCRF90IO()
1300 DCHAR(position), DCHAR(action), DCHAR(read), DCHAR(write0), in ENTCRF90IO()
1329 DCHAR(position), DCHAR(action), DCHAR(read), DCHAR(write0), in ENTCRF90IO()
1438 DCHAR(position), DCHAR(action), DCHAR(read), DCHAR(write0), in ENTCRF90IO()
2137 DCHAR(position), DCHAR(action), DCHAR(read), DCHAR(write0), DCHAR(readwrite), in ENTF90IO()
[all …]
|
| H A D | open.c | 568 DCHAR(blank), /* ZERO or NULL */ in ENTF90IO()
570 DCHAR(name), /* file name */ in ENTF90IO()
653 DCHAR(blank), /* ZERO or NULL */ in ENTF90IO()
655 DCHAR(name), /* file name */ in ENTF90IO()
692 DCHAR(blank), /* ZERO or NULL */ in ENTF90IO()
694 DCHAR(name), /* file name */ in ENTF90IO()
779 DCHAR(name), /* file name */ in ENTF90IO()
881 DCHAR(blank), /* ZERO or NULL */ in ENTCRF90IO()
883 DCHAR(name), /* file name */ in ENTCRF90IO()
962 DCHAR(blank), /* ZERO or NULL */ in ENTCRF90IO()
[all …]
|
| H A D | splitpathqq3f.c | 31 int ENT3F(SPLITPATHQQ, splitpathqq)(DCHAR(fpath), DCHAR(fdrive), DCHAR(fdir), in ENT3F()
32 DCHAR(fname), in ENT3F()
33 DCHAR(fext) DCLEN(fpath) DCLEN(fdrive) in ENT3F()
87 int ENT3F(SPLITPATHQQ, splitpathqq)(DCHAR(fpath), DCHAR(fdrive), DCHAR(fdir), in ENT3F()
88 DCHAR(fname), in ENT3F()
89 DCHAR(fext) DCLEN(fpath) DCLEN(fdrive) in ENT3F()
|
| H A D | ftnexit.c | 94 void ENTF90(ERRORSTOP08a_char, errorstop08a_char)(__LOG_T *isquiet, DCHAR(str) DCLEN64(str)) in ENTF90()
124 void ENTF90(STOP08a, stop08a)(__INT_T *exit_status, DCHAR(str) DCLEN64(str)) in ENTF90()
141 void ENTF90(STOP08, stop08)(__INT_T *exit_status, DCHAR(str) DCLEN(str)) in ENTF90()
146 void ENTF90(STOPA, stopa)(DCHAR(str) DCLEN64(str)) in ENTF90()
156 void ENTF90(STOP, stop)(DCHAR(str) DCLEN(str)) in ENTF90()
161 void ENTCRF90(STOPA, stopa)(DCHAR(str) DCLEN64(str)) in ENTCRF90()
169 void ENTCRF90(STOP, stop)(DCHAR(str) DCLEN(str)) in ENTCRF90()
197 void ENTF90(PAUSEA, pausea)(DCHAR(str) DCLEN64(str)) in ENTF90()
209 void ENTF90(PAUSE, pause)(DCHAR(str) DCLEN(str)) in ENTF90()
214 void ENTCRF90(PAUSEA, pausea)(DCHAR(str) DCLEN64(str)) in ENTCRF90()
[all …]
|
| H A D | findfileqq3f.c | 32 int ENT3F(FINDFILEQQ, findfileqq)(DCHAR(fname), DCHAR(fvarname), in ENT3F()
33 DCHAR(fpath) DCLEN(fname) DCLEN(fvarname) in ENT3F()
70 int ENT3F(FINDFILEQQ, findfileqq)(DCHAR(fname), DCHAR(fvarname), in ENT3F()
71 DCHAR(fpath) DCLEN(fname) DCLEN(fvarname) in ENT3F()
|
| H A D | eoshift.c | 561 DCHAR(bb), /* boundary base */ in ENTFTN()
580 DCHAR(bb), /* boundary base */ in ENTFTN()
640 DCHAR(ab), /* array char base */ in ENTFTN()
717 DCHAR(bb), /* boundary base */ in ENTFTN()
736 DCHAR(bb), /* boundary base */ in ENTFTN()
796 void ENTFTN(EOSHIFTCA, eoshiftca)(DCHAR(rb), /* result base */ in ENTFTN()
797 DCHAR(ab), /* array base */ in ENTFTN()
800 DCHAR(bb), /* boundary base */ in ENTFTN()
815 void ENTFTN(EOSHIFTC, eoshiftc)(DCHAR(rb), /* result base */ in ENTFTN()
816 DCHAR(ab), /* array base */ in ENTFTN()
[all …]
|
| H A D | pack.c | 160 void ENTFTN(PACKCA, packca)(DCHAR(rb), /* result char base */ in ENTFTN()
161 DCHAR(ab), /* array char base */ in ENTFTN()
163 DCHAR(vb), /* vector char base */ in ENTFTN()
176 void ENTFTN(PACKC, packc)(DCHAR(rb), /* result char base */ in ENTFTN()
177 DCHAR(ab), /* array char base */ in ENTFTN()
179 DCHAR(vb), /* vector char base */ in ENTFTN()
289 DCHAR(ab), /* array char base */ in ENTFTN()
301 void ENTFTN(PACKZC, packzc)(DCHAR(rb), /* result char base */ in ENTFTN()
302 DCHAR(ab), /* array char base */ in ENTFTN()
423 DCHAR(fb), /* field char base */ in ENTFTN()
[all …]
|
| H A D | getarg.c | 40 ENTRY(GETARGA, getarga)(__INT_T *n, DCHAR(arg) DCLEN64(arg)) in ENTRY()
65 ENTRY(GETARG, getarg)(__INT_T *n, DCHAR(arg) DCLEN(arg)) in ENTRY()
87 ENTF90(GET_CMD_ARGA, get_cmd_arga)(__INT_T *number, DCHAR(value), in ENTF90()
138 ENTF90(GET_CMD_ARG, get_cmd_arg)(__INT_T *number, DCHAR(value), in ENTF90()
147 ENTF90(GET_CMDA, get_cmda)(DCHAR(command), __INT_T *length, __INT_T *status, in ENTF90()
211 ENTF90(GET_CMD, get_cmd)(DCHAR(command), __INT_T *length, __INT_T *status, in ENTF90()
219 ENTF90(GET_ENV_VARA, get_env_vara)(DCHAR(name), DCHAR(value), __INT_T *length, in ENTF90()
277 ENTF90(GET_ENV_VAR, get_env_var)(DCHAR(name), DCHAR(value), __INT_T *length, in ENTF90()
|
| H A D | ptr.c | 373 (DCHAR(pb), F90_Desc *pd, DCHAR(tb), F90_Desc *td, in ENTFTN()
403 (DCHAR(pb), F90_Desc *pd, DCHAR(tb), F90_Desc *td, in ENTFTN()
444 (DCHAR(pb), F90_Desc *pd, DCHAR(tb), F90_Desc *td, in ENTFTN()
477 (DCHAR(pb), F90_Desc *pd, DCHAR(tb), F90_Desc *td, in ENTFTN()
518 (DCHAR(pb), F90_Desc *pd, DCHAR(tb), F90_Desc *td, in ENTFTN()
548 (DCHAR(pb), F90_Desc *pd, DCHAR(tb), F90_Desc *td, in ENTFTN()
954 (DCHAR(pb), F90_Desc *pd, DCHAR(tb), F90_Desc *td, in ENTFTN()
986 (DCHAR(pb), F90_Desc *pd, DCHAR(tb), F90_Desc *td, in ENTFTN()
995 (DCHAR(pb), F90_Desc *pd, DCHAR(tb), F90_Desc *td, in ENTFTN()
1245 (DCHAR(pb), F90_Desc *pd, DCHAR(tb), F90_Desc *td, in ENTFTN()
[all …]
|
| H A D | f90alloc.h | 27 __INT_T *firsttime, DCHAR(errmsg) DCLEN(errmsg));
33 DCHAR(errmsg) DCLEN(errmsg));
37 DCHAR(errmsg) DCLEN(errmsg));
41 DCHAR(errmsg) DCLEN(errmsg));
|
| H A D | fullpathqq3f.c | 31 int ENT3F(FULLPATHQQ, fullpathqq)(DCHAR(fname), in ENT3F()
32 DCHAR(fpath) DCLEN(fname) DCLEN(fpath)) in ENT3F()
65 int ENT3F(FULLPATHQQ, fullpathqq)(DCHAR(fname), in ENT3F()
66 DCHAR(fpath) DCLEN(fname) DCLEN(fpath)) in ENT3F()
|
| H A D | allo.c | 840 DCHAR(base) DCLEN64(base)) in ENTF90()
865 DCHAR(base) DCLEN(base)) in ENTF90()
936 DCHAR(errmsg) DCLEN64(errmsg)) in ENTF90()
965 DCHAR(errmsg) DCLEN(errmsg)) in ENTF90()
1001 DCHAR(base) DCLEN(base)) in ENTF90()
1022 DCHAR(base) DCLEN(base)) in ENTF90()
1033 DCHAR(errmsg) DCLEN64(errmsg)) in ENTF90()
1049 DCHAR(errmsg) DCLEN(errmsg)) in ENTF90()
1088 DCHAR(base) DCLEN(base)) in ENTF90()
1295 DCHAR(errmsg) DCLEN(errmsg)) in ENTF90()
[all …]
|
| H A D | error.c | 646 DCHAR(name) /* name of source file */ in ENTF90IO()
658 DCHAR(name) /* name of source file */ in ENTF90IO()
666 DCHAR(name) /* name of source file */ in ENTF90IO()
678 DCHAR(name) /* name of source file */ in ENTF90IO()
686 DCHAR(name) /* name of source file */ in ENTCRF90IO()
705 DCHAR(name) /* name of source file */ in ENTCRF90IO()
716 DCHAR(name) /* name of source file */ in ENTCRF90IO()
743 DCHAR(name) /* name of source file */ in ENTF90IO()
754 DCHAR(name) /* name of source file */ in ENTF90IO()
780 DCHAR(name) /* name of source file */ in ENTCRF90IO()
[all …]
|
| H A D | getfileinfoqq3f.c | 34 extern int __GETFILEINFOQQ(DCHAR(ffiles), char *buffer,
37 int ENT3F(GETFILEINFOQQ, getfileinfoqq)(DCHAR(ffiles), char *buffer, in ENT3F()
43 int ENT3F(GETFILEINFOQQ, getfileinfoqq)(DCHAR(ffiles), int *buffer, in ENT3F()
|
| H A D | spread.c | 142 void ENTFTN(SPREADCA, spreadca)(DCHAR(rb), /* result char base */ in ENTFTN()
143 DCHAR(sb), /* source char base */ in ENTFTN()
157 void ENTFTN(SPREADC, spreadc)(DCHAR(rb), /* result char base */ in ENTFTN()
158 DCHAR(sb), /* source char base */ in ENTFTN()
175 spreadcsa)(DCHAR(rb), /* result char base */ in ENTFTN()
176 DCHAR(sb), /* source char base */ in ENTFTN()
195 spreadcs)(DCHAR(rb), /* result char base */ in ENTFTN()
196 DCHAR(sb), /* source char base */ in ENTFTN()
|
| H A D | gerror3f.c | 34 void ENT3F(GERROR, gerror)(DCHAR(str) DCLEN(str)) in ENT3F()
43 void ENT3F(GET_IOSTAT_MSG, get_iostat_msg)(int *ios, DCHAR(str) DCLEN(str)) in ENT3F()
51 void ENT3F(GET_IOSTAT_MSG_, get_iostat_msg_)(int *ios, DCHAR(str) DCLEN(str)) in ENT3F()
|
| H A D | ldwrite.c | 329 (__INT_T *istat, DCHAR(decimal), DCHAR(delim), in ENTF90IO()
382 (__INT_T *istat, DCHAR(decimal), DCHAR(delim), in ENTF90IO()
383 DCHAR(sign) DCLEN(decimal) DCLEN(delim) DCLEN(sign)) in ENTF90IO()
427 (DCHAR(cunit), /* pointer to variable or array to in ENTF90IO()
674 DCHAR(item) /* where to transfer data from */ in ENTF90IO()
690 DCHAR(item) /* where to transfer data from */ in ENTF90IO()
704 DCHAR(item) /* where to transfer data from */ in ENTF90IO()
720 DCHAR(item) /* where to transfer data from */ in ENTF90IO()
731 DCHAR(item) /* where to transfer data from */ in ENTF90IO()
758 DCHAR(item) /* where to transfer data from */ in ENTCRF90IO()
[all …]
|
| H A D | miscsup_com.c | 390 (DCHAR(res), DCHAR(expr) DCLEN64(res) DCLEN64(expr)) in ENTF90()
407 (DCHAR(res), DCHAR(expr) DCLEN(res) DCLEN(expr)) in ENTF90()
431 (DCHAR(res), DCHAR(expr) DCLEN(res) DCLEN(expr)) in ENTF90()
694 ENTFTN(DANDTA, dandta)(DCHAR(date), DCHAR(tbuf), DCHAR(zone), in ENTFTN()
799 ENTFTN(DANDT, dandt)(DCHAR(date), DCHAR(tbuf), DCHAR(zone), in ENTFTN()
2963 ENTF90(MERGECHA, mergecha)(DCHAR(result), DCHAR(tsource), DCHAR(fsource),
2974 ENTF90(MERGECH, mergech)(DCHAR(result), DCHAR(tsource), DCHAR(fsource),
3245 (DCHAR(string), DCHAR(substring), void *back,
3275 (DCHAR(string), DCHAR(substring), void *back,
3284 (DCHAR(string), DCHAR(substring), void *back,
[all …]
|
| H A D | ent3f.h | 25 #undef DCHAR
37 #define DCHAR(ARG) char *ARG##_adr, int ARG##_len macro
45 #define DCHAR(ARG) char *ARG##_adr macro
|
| H A D | ftn.c | 81 void ENTFTN(CSENDCHARA, csendchara)(__INT_T *cpu, DCHAR(buf), __INT_T *cnt, in ENTFTN()
100 void ENTFTN(CSENDCHAR, csendchar)(__INT_T *cpu, DCHAR(buf), __INT_T *cnt, in ENTFTN()
117 void ENTFTN(CRECVCHARA, crecvchara)(__INT_T *cpu, DCHAR(buf), __INT_T *cnt, in ENTFTN()
136 void ENTFTN(CRECVCHAR, crecvchar)(__INT_T *cpu, DCHAR(buf), __INT_T *cnt, in ENTFTN()
|
| H A D | unf.c | 592 DCHAR(item) /* where to xfer data */ in ENTF90IO()
618 DCHAR(item) /* where to xfer data */ in ENTF90IO()
634 DCHAR(item) /* where to xfer data */ in ENTF90IO()
660 DCHAR(item) /* where to xfer data */ in ENTF90IO()
673 DCHAR(item) /* where to xfer data */ in ENTF90IO()
699 DCHAR(item) /* where to xfer data */ in ENTF90IO()
1575 DCHAR(item) /* where to xfer data */ in ENTF90IO()
1601 DCHAR(item) /* where to xfer data */ in ENTF90IO()
1617 DCHAR(item) /* where to xfer data */ in ENTF90IO()
1643 DCHAR(item) /* where to xfer data */ in ENTF90IO()
[all …]
|
| H A D | ldread.c | 408 (__INT_T *istat, DCHAR(blank), DCHAR(decimal), DCHAR(pad), in ENTF90IO()
469 (__INT_T *istat, DCHAR(blank), DCHAR(decimal), DCHAR(pad), in ENTF90IO()
470 DCHAR(round) DCLEN(blank) DCLEN(decimal) DCLEN(pad) DCLEN(round)) in ENTF90IO()
708 DCHAR(item) /* where to transfer data to */ in ENTF90IO()
740 DCHAR(item) /* where to transfer data to */ in ENTF90IO()
754 DCHAR(item) /* where to transfer data to */ in ENTF90IO()
786 DCHAR(item) /* where to transfer data to */ in ENTF90IO()
797 DCHAR(item) /* where to transfer data to */ in ENTF90IO()
830 DCHAR(item) /* where to transfer data to */ in ENTF90IO()
842 DCHAR(item) /* where to transfer data to */ in ENTCRF90IO()
[all …]
|
| H A D | reshape.c | 232 void ENTFTN(RESHAPECA, reshapeca)(DCHAR(resb), /* result char base */ in ENTFTN()
233 DCHAR(srcb), /* source char base */ in ENTFTN()
235 DCHAR(padb), /* pad char base */ in ENTFTN()
251 void ENTFTN(RESHAPEC, reshapec)(DCHAR(resb), /* result char base */ in ENTFTN()
252 DCHAR(srcb), /* source char base */ in ENTFTN()
254 DCHAR(padb), /* pad char base */ in ENTFTN()
|
| H A D | entry.c | 95 DCHAR(func), in ENTFTN()
96 DCHAR(file) DCLEN64(func) DCLEN64(file)) in ENTFTN()
128 DCHAR(func), in ENTFTN()
129 DCHAR(file) DCLEN(func) DCLEN(file)) in ENTFTN()
239 void ENTFTN(TRACECALLA, tracecalla)(DCHAR(msg) DCLEN64(msg)) in ENTFTN()
254 void ENTFTN(TRACECALL, tracecall)(DCHAR(msg) DCLEN(msg)) in ENTFTN()
|