/dports/math/libpgmath/flang-d07daf3/runtime/flang/ |
H A D | miscsup_com.c | 339 ENTF90(KICHARA, kichara) in ENTF90() function 346 ENTF90(KICHAR, kichar) in ENTF90() function 406 ENTF90(ADJUSTL, adjustl) in ENTF90() function 2832 ENTF90(ACHAR, achar) in ENTF90() function 2862 ENTF90(TRIMA, trima) function 2932 ENTF90(TRIM, trim) function 3107 ENTF90(SCANA, scana) function 3128 ENTF90(SCAN, scan) function 3160 ENTF90(KSCAN, kscan) function 3313 ENTF90(INDEX, index) function [all …]
|
H A D | allo.c | 629 ENTF90(ALLOCATED, allocated)(char *area) in ENTF90() function 635 ENTF90(ALLOCATED2, allocated2)(char *area) in ENTF90() function 641 ENTF90(ALLOCATED_LHS, allocated_lhs)(char *area) in ENTF90() function 654 ENTF90(KALLOCATED, kallocated)(char *area) in ENTF90() function 661 ENTF90(KALLOCATED2, kallocated2)(char *area) in ENTF90() function 1051 ENTF90(CALLOC03A, calloc03a)(nelem, kind, len, in ENTF90() 1305 ENTF90(PTR_SRC_CALLOC04A, ptr_src_calloc04a) in ENTF90() function 1339 ENTF90(PTR_SRC_CALLOC04, ptr_src_calloc04) in ENTF90() function 1376 ENTF90(PTR_CALLOC03A, ptr_calloc03a) in ENTF90() function 1392 ENTF90(PTR_CALLOC03, ptr_calloc03) in ENTF90() function [all …]
|
H A D | ftnexit.c | 30 void ENTF90(EXIT, exit)(__INT_T *exit_status) in ENTF90() function 111 void ENTF90(ERRORSTOP08a_int, errorstop08a_int)(__INT_T *stop_code, __LOG_T *isquiet) in ENTF90() function 124 void ENTF90(STOP08a, stop08a)(__INT_T *exit_status, DCHAR(str) DCLEN64(str)) in ENTF90() function 141 void ENTF90(STOP08, stop08)(__INT_T *exit_status, DCHAR(str) DCLEN(str)) in ENTF90() function 143 ENTF90(STOP08A, stop08a)(exit_status, CADR(str), (__CLEN_T)CLEN(str)); in ENTF90() 146 void ENTF90(STOPA, stopa)(DCHAR(str) DCLEN64(str)) in ENTF90() function 156 void ENTF90(STOP, stop)(DCHAR(str) DCLEN(str)) in ENTF90() function 158 ENTF90(STOPA, stopa)(CADR(str), (__CLEN_T)CLEN(str)); in ENTF90() 197 void ENTF90(PAUSEA, pausea)(DCHAR(str) DCLEN64(str)) in ENTF90() function 209 void ENTF90(PAUSE, pause)(DCHAR(str) DCLEN(str)) in ENTF90() function [all …]
|
H A D | getarg.c | 71 ENTF90(CMD_ARG_CNT, cmd_arg_cnt)() in ENTF90() function 81 ENTF90(KCMD_ARG_CNT, kcmd_arg_cnt)() in ENTF90() function 83 return ENTF90(CMD_ARG_CNT, cmd_arg_cnt)(); in ENTF90() 87 ENTF90(GET_CMD_ARGA, get_cmd_arga)(__INT_T *number, DCHAR(value), in ENTF90() function 138 ENTF90(GET_CMD_ARG, get_cmd_arg)(__INT_T *number, DCHAR(value), in ENTF90() function 142 ENTF90(GET_CMD_ARGA, get_cmd_arga)(number, CADR(value), length, status, in ENTF90() 147 ENTF90(GET_CMDA, get_cmda)(DCHAR(command), __INT_T *length, __INT_T *status, in ENTF90() function 211 ENTF90(GET_CMD, get_cmd)(DCHAR(command), __INT_T *length, __INT_T *status, in ENTF90() function 214 ENTF90(GET_CMDA, get_cmda)(CADR(command), length, status, int_kind, in ENTF90() 277 ENTF90(GET_ENV_VAR, get_env_var)(DCHAR(name), DCHAR(value), __INT_T *length, in ENTF90() function [all …]
|
H A D | type.c | 47 ENTF90(SAME_TYPE_AS, same_type_as) in ENTF90() function 89 ENTF90(EXTENDS_TYPE_OF, extends_type_of) in ENTF90() function 155 ENTF90(KSAME_TYPE_AS, ksame_type_as) in ENTF90() function 782 void ENTF90(DEALLOC_POLY_MBR03A, in ENTF90() function 835 ENTF90(DEALLOC_MBR03, dealloc_mbr03) in ENTF90() 840 void ENTF90(DEALLOC_POLY_MBR03, in ENTF90() function 905 ENTF90(DEALLOC03A, dealloc03a) in ENTF90() 977 ENTF90(PTR_ALLOC03, ptr_alloc03) in sourced_alloc_and_assign() 1788 void ENTF90(POLY_ASN_SRC_INTRIN, in ENTF90() function 1807 void ENTF90(POLY_ASN_DEST_INTRIN, in ENTF90() function [all …]
|
H A D | f90alloc.h | 24 void ENTF90(PTR_ALLOC03, 29 void ENTF90(PTR_SRC_ALLOC03, 35 void ENTF90(DEALLOC03, dealloc03)(__STAT_T *stat, char *area, 39 void ENTF90(DEALLOC_MBR03, dealloc_mbr03)(__STAT_T *stat, char *area,
|
H A D | type.h | 155 extern __INT_T ENTF90(GET_OBJECT_SIZE, get_object_size)(F90_Desc *d); 156 extern __INT8_T ENTF90(KGET_OBJECT_SIZE, kget_object_size)(F90_Desc *d); 157 void ENTF90(SET_TYPE, set_type)(F90_Desc *dd, OBJECT_DESC *td);
|
H A D | rdst.c | 1354 ENTF90(TEMPLATE2, template2)(F90_Desc *dd, __INT_T *p_flags, in ENTF90() function 1409 ENTF90(TEMPLATE3, template3)(F90_Desc *dd, __INT_T *p_flags, in ENTF90() function 1734 ENTF90(ADDR_1_DIM_1ST_ELEM, addr_1_dim_1st_elem) in ENTF90() function 1960 ENTF90(COPY_F77_ARGSL, copy_f77_argsl) in ENTF90() function 2045 ENTF90(COPY_F90_ARG, copy_f90_arg) in ENTF90() function 2582 ENTF90(CONFORMABLE_NN, conformable_nn)(char *db, ...) in ENTF90() function 2644 ENTF90(CONFORMABLE_22V, conformable_22v)(char *db, in ENTF90() function 2674 ENTF90(CONFORMABLE_33V, conformable_33v)(char *db, in ENTF90() function 2707 ENTF90(CONFORMABLE_NNV, conformable_nnv)(char *db, ...) in ENTF90() function 2748 ENTF90(IS_CONTIGUOUS, is_contiguous)(char *ab, F90_Desc *ad) in ENTF90() function [all …]
|
H A D | cplxf.c | 49 void ENTF90(MERGEC, mergec)(cmplx_t *res, cmplx_t *tsource, cmplx_t *fsource, in ENTF90() function 61 void ENTF90(MERGEDC, mergedc)(dcmplx_t *res, dcmplx_t *tsource, in ENTF90() function
|
H A D | ptr.c | 819 ENTF90(TMP_DESC,tmp_desc)(F90_Desc *nd, F90_Desc *od) in ENTF90() function 1855 ENTF90(PTRCP, ptrcp)(void *to, void *from) in ENTF90() function 1878 ENTF90(SET_TYPE, set_type)(td, (OBJECT_DESC *)fd); in ENTF90() 1934 ENTF90(TEMPLATE1, template1)(fd, &flags, ft, sz, &one, &ub[0]); in ENTF90() 1937 ENTF90(TEMPLATE2,template2)(fd, &flags, ft, sz, in ENTF90() 1941 ENTF90(TEMPLATE3,template3)(fd, &flags, ft, sz, in ENTF90() 1945 ENTF90(TEMPLATE,template)(fd, rank, &flags, ft, sz, in ENTF90() 1949 ENTF90(TEMPLATE,template)(fd, rank, &flags, ft, sz, in ENTF90() 1954 ENTF90(TEMPLATE,template)(fd, rank, &flags, ft, sz, in ENTF90() 1959 ENTF90(TEMPLATE,template)(fd, rank, &flags, ft, sz, in ENTF90() [all …]
|
H A D | mmulreal8_t.c | 28 void ENTF90(MATMUL_REAL8, in ENTF90() function
|
H A D | mmulreal4_t.c | 28 void ENTF90(MATMUL_REAL4, in ENTF90() function
|
H A D | mmullog2.c | 25 void ENTF90(MATMUL_LOG2, matmul_log2)(char *dest_addr, char *s1_addr, in ENTF90() function
|
H A D | mmullog4.c | 25 void ENTF90(MATMUL_LOG4, matmul_log4)(char *dest_addr, char *s1_addr, in ENTF90() function
|
H A D | mmullog8.c | 25 void ENTF90(MATMUL_LOG8, matmul_log8)(char *dest_addr, char *s1_addr, in ENTF90() function
|
H A D | mmulcplx16_t.c | 28 void ENTF90(MATMUL_CPLX16, in ENTF90() function
|
H A D | mmulcplx8_t.c | 28 void ENTF90(MATMUL_CPLX8, in ENTF90() function
|
H A D | mmullog1.c | 25 void ENTF90(MATMUL_LOG1, matmul_log1)(char *dest_addr, char *s1_addr, in ENTF90() function
|
H A D | mmulint1.c | 28 void ENTF90(MATMUL_INT1, matmul_int1)(char *dest_addr, char *s1_addr, in ENTF90() function
|
H A D | mmulint2.c | 28 void ENTF90(MATMUL_INT2, matmul_int2)(char *dest_addr, char *s1_addr, in ENTF90() function
|
H A D | mmulint4.c | 28 void ENTF90(MATMUL_INT4, matmul_int4)(char *dest_addr, char *s1_addr, in ENTF90() function
|
H A D | mmulint8.c | 28 void ENTF90(MATMUL_INT8, matmul_int8)(char *dest_addr, char *s1_addr, in ENTF90() function
|
H A D | mmulreal4.c | 28 void ENTF90(MATMUL_REAL4, matmul_real4)(char *dest_addr, char *s1_addr, in ENTF90() function
|
/dports/math/libpgmath/flang-d07daf3/runtime/include/ |
H A D | FuncArgMacros.h | 34 #define ENTF90(UC, LC) pgf90_##LC##_i8 macro 44 #define ENTF90(UC, LC) pgf90_##LC macro 59 #define ENTF90(UC, LC) pgf90_##LC macro 73 #define ENTF90(UC, LC) pgf90_##LC macro 88 #define ENTF90(UC, LC) f90_##LC##_i8 macro 98 #define ENTF90(UC, LC) f90_##LC macro
|
/dports/math/libpgmath/flang-d07daf3/runtime/flangmain/ |
H A D | flangmain.c | 70 ENTF90(EXIT, exit)(&i); in main()
|