Home
last modified time | relevance | path

Searched refs:__INT4_T (Results 1 – 25 of 40) sorted by relevance

12

/dports/math/libpgmath/flang-d07daf3/runtime/flang/
H A Dmiscsup_com.c506 ENTFTN(JDATE, jdate)(__INT4_T *i, __INT4_T *j, __INT4_T *k, F90_Desc *id, in ENTFTN()
918 *(__INT4_T *)to = *(__INT4_T *)from; in ENTF90()
1028 __INT4_T
1180 __INT4_T
1885 __INT4_T
2011 __INT4_T
3005 __INT4_T
3434 __INT4_T
3437 __INT4_T
3443 __INT4_T
[all …]
H A Dmatmul.h57 void f90_mm_int4_str1_mxv_(__INT4_T *, __INT4_T *, __INT4_T *, __INT_T *,
59 void f90_mm_int4_str1_vxm_(__INT4_T *, __INT4_T *, __INT4_T *, __INT_T *,
61 void f90_mm_int4_str1_(__INT4_T *, __INT4_T *, __INT4_T *, __INT_T *,
H A Dred_iany.c33 ARITHFN(|, iany_int4, __INT4_T, __INT4_T)
42 ARITHFNLKN(|, iany_int4, __INT4_T, __INT4_T, 1)
51 ARITHFNLKN(|, iany_int4, __INT4_T, __INT4_T, 2)
60 ARITHFNLKN(|, iany_int4, __INT4_T, __INT4_T, 4)
69 ARITHFNLKN(|, iany_int4, __INT4_T, __INT4_T, 8)
H A Dutil.c33 return (int)(*(__INT4_T *)b); in I8()
84 return (int)(*(__INT4_T *)b); in I8()
117 *(__INT4_T *)b = (__INT4_T)val; in I8()
214 val = (int)(*(__INT4_T *)tmp); in I8()
246 *(__INT4_T *)adr = (__INT4_T)val; in I8()
278 *vec = (int)(*(__INT4_T *)tmp); in I8()
310 *(__INT4_T *)adr = (__INT4_T)*vec; in I8()
H A Dmmulint4.c33 __INT4_T *s1_base; in ENTF90()
34 __INT4_T *s2_base; in ENTF90()
35 __INT4_T *dest_base; in ENTF90()
36 __INT4_T *d_elem_p; in ENTF90()
37 __INT4_T *s1_elem_p; in ENTF90()
38 __INT4_T *s2_elem_p; in ENTF90()
40 __INT4_T rslt_tmp; in ENTF90()
173 s1_base = (__INT4_T *)s1_addr + F90_LBASE_G(s1_desc) + in ENTF90()
175 s2_base = (__INT4_T *)s2_addr + F90_LBASE_G(s2_desc) + in ENTF90()
177 dest_base = (__INT4_T *)dest_addr + F90_LBASE_G(dest_desc) + in ENTF90()
H A DfortDt.h150 typedef int __INT4_T; /* 25 __INT4 integer*4 */ typedef
199 __INT4_T l, h;
209 __INT4_T l, k, j, h;
239 typedef __INT4_T __INT_T;
241 typedef __INT4_T __STAT_T;
267 typedef __INT4_T __BIGINT_T;
H A Dred.h335 __INT_T ms, __INT4_T *loc, __INT_T li, __INT_T ls, \
338 __INT4_T i, j; \
339 __INT4_T t_loc = 0; \
368 static void g_##NAME(__INT_T n, RTYP *lval, RTYP *rval, __INT4_T *lloc, \
371 __INT4_T i; \
384 __INT_T ms, __INT4_T *loc, __INT_T li, __INT_T ls, \
387 __INT4_T i, j, ahop; \
388 __INT4_T t_loc = 0; \
418 static void g_##NAME(__INT_T n, RTYP *lval, RTYP *rval, __INT4_T *lloc, \
421 __INT4_T i; \
[all …]
H A Dconst.c57 sizeof(__INT4_T), /* F integer*4 */
155 static __INT4_T max_int4 = 0; /* initialized */
214 static __INT4_T min_int4 = 0; /* initialized */
273 static __INT4_T unit_int4 = 1;
328 static __INT4_T __fort_true_int4;
383 __INT4_T __fort_mask_int4;
512 __INT4_T
564 __set_fort_mask_int4(__INT4_T m) in __set_fort_mask_int4()
684 max_int4 = MAX_FOR_INT_TYPE(__INT4_T); in __fort_init_consts()
H A Dred_maxloc.c28 MLOCFNLKN(>, maxloc_int4, __INT4_T, 1)
37 MLOCFNLKN(>, maxloc_int4, __INT4_T, 2)
46 MLOCFNLKN(>, maxloc_int4, __INT4_T, 4)
55 MLOCFNLKN(>, maxloc_int4, __INT4_T, 8)
64 MLOCFNG(>, maxloc_int4, __INT4_T)
76 KMLOCFNLKN(>, kmaxloc_int4, __INT4_T, 1)
85 KMLOCFNLKN(>, kmaxloc_int4, __INT4_T, 2)
94 KMLOCFNLKN(>, kmaxloc_int4, __INT4_T, 4)
103 KMLOCFNLKN(>, kmaxloc_int4, __INT4_T, 8)
112 KMLOCFNG(>, kmaxloc_int4, __INT4_T)
H A Dred_findloc.c28 FLOCFNLKN(==, findloc_int4, __INT4_T, 1)
37 FLOCFNLKN(==, findloc_int4, __INT4_T, 2)
46 FLOCFNLKN(==, findloc_int4, __INT4_T, 4)
55 FLOCFNLKN(==, findloc_int4, __INT4_T, 8)
64 FLOCFNG(==, findloc_int4, __INT4_T)
76 KFLOCFNLKN(==, kfindloc_int4, __INT4_T, 1)
85 KFLOCFNLKN(==, kfindloc_int4, __INT4_T, 2)
94 KFLOCFNLKN(==, kfindloc_int4, __INT4_T, 4)
103 KFLOCFNLKN(==, kfindloc_int4, __INT4_T, 8)
112 KFLOCFNG(==, kfindloc_int4, __INT4_T)
H A Dred_minloc.c29 MLOCFNLKN(<, minloc_int4, __INT4_T, 1)
38 MLOCFNLKN(<, minloc_int4, __INT4_T, 2)
47 MLOCFNLKN(<, minloc_int4, __INT4_T, 4)
56 MLOCFNLKN(<, minloc_int4, __INT4_T, 8)
65 MLOCFNG(<, minloc_int4, __INT4_T)
77 KMLOCFNLKN(<, kminloc_int4, __INT4_T, 1)
86 KMLOCFNLKN(<, kminloc_int4, __INT4_T, 2)
95 KMLOCFNLKN(<, kminloc_int4, __INT4_T, 4)
104 KMLOCFNLKN(<, kminloc_int4, __INT4_T, 8)
113 KMLOCFNG(<, kminloc_int4, __INT4_T)
H A Dred_all.c34 LOGFN(&, all_int4, __INT4_T)
43 LOGFNLKN(&, all_int4, __INT4_T, 1)
52 LOGFNLKN(&, all_int4, __INT4_T, 2)
61 LOGFNLKN(&, all_int4, __INT4_T, 4)
70 LOGFNLKN(&, all_int4, __INT4_T, 8)
H A Dred_any.c34 LOGFN(|, any_int4, __INT4_T)
43 LOGFNLKN(|, any_int4, __INT4_T, 1)
52 LOGFNLKN(|, any_int4, __INT4_T, 2)
61 LOGFNLKN(|, any_int4, __INT4_T, 4)
70 LOGFNLKN(|, any_int4, __INT4_T, 8)
H A Dred_count.c65 COUNTFN(count_int4, __INT4_T)
74 COUNTFNLKN(count_int4, __INT4_T, 1)
83 COUNTFNLKN(count_int4, __INT4_T, 2)
92 COUNTFNLKN(count_int4, __INT4_T, 4)
101 COUNTFNLKN(count_int4, __INT4_T, 8)
H A Dred_maxval.c28 CONDFNLKN(>, maxval_int4, __INT4_T, 1)
37 CONDFNLKN(>, maxval_int4, __INT4_T, 2)
46 CONDFNLKN(>, maxval_int4, __INT4_T, 4)
55 CONDFNLKN(>, maxval_int4, __INT4_T, 8)
64 CONDFNG(>, maxval_int4, __INT4_T)
H A Dred_minval.c28 CONDFNLKN(<, minval_int4, __INT4_T, 1)
37 CONDFNLKN(<, minval_int4, __INT4_T, 2)
46 CONDFNLKN(<, minval_int4, __INT4_T, 4)
55 CONDFNLKN(<, minval_int4, __INT4_T, 8)
64 CONDFNG(<, minval_int4, __INT4_T)
H A Dred_sum.c85 ARITHFN(+, sum_int4, __INT4_T, long)
96 ARITHFNLKN(+, sum_int4, __INT4_T, long, 1)
107 ARITHFNLKN(+, sum_int4, __INT4_T, long, 2)
118 ARITHFNLKN(+, sum_int4, __INT4_T, long, 4)
129 ARITHFNLKN(+, sum_int4, __INT4_T, long, 8)
H A Dred_norm2.c30 void ENTFTN(NORM2_NODIM, norm2_nodim) (__POINT_T *result, __POINT_T *src, __INT4_T * pfr, _DIST_TYP… in ENTFTN()
96 void ENTFTN(NORM2, norm2) (__POINT_T *result, __POINT_T *src, __INT4_T * pfr, __INT4_T *dim, F90_De… in ENTFTN()
H A Dgathscat.c50 local_scatter_INT4(int n, __INT4_T *dst, int *sv, __INT4_T *src) in local_scatter_INT4()
209 local_gathscat_INT4(int n, __INT4_T *dst, int *sv, __INT4_T *src, int *gv) in local_gathscat_INT4()
H A Dgetarg.c70 __INT4_T
300 *(__INT4_T *)b = (__INT4_T)v; in store_int_kind()
H A Dgather.c40 local_gather_INT4(int n, __INT4_T *dst, __INT4_T *src, int *gv) in local_gather_INT4()
H A Dscalar_copy.c144 copy_int4(__INT4_T *rp, __INT4_T *sp, int size) in copy_int4()
H A Dpack.c120 mval = (*(__INT4_T *)tmp & GET_DIST_MASK_INT4) != 0; in ENTFTN()
263 mval = (*(__INT4_T *)tmp & GET_DIST_MASK_INT4) != 0; in ENTFTN()
388 mval = (*(__INT4_T *)tmp & GET_DIST_MASK_INT4) != 0; in ENTFTN()
H A Dscatter_maxval.c43 scatter_maxval_int4(int n, __INT4_T *r, int *sv, __INT4_T *a) in scatter_maxval_int4()
137 gathscat_maxval_int4(int n, __INT4_T *r, int *sv, __INT4_T *a, int *gv) in gathscat_maxval_int4()
H A Dscatter_minval.c43 scatter_minval_int4(int n, __INT4_T *r, int *sv, __INT4_T *a) in scatter_minval_int4()
137 gathscat_minval_int4(int n, __INT4_T *r, int *sv, __INT4_T *a, int *gv) in gathscat_minval_int4()

12