Home
last modified time | relevance | path

Searched refs:__INT1_T (Results 1 – 25 of 38) sorted by relevance

12

/dports/math/libpgmath/flang-d07daf3/runtime/flang/
H A Dmatmul.h41 void f90_mm_int1_str1_mxv_(__INT1_T *, __INT1_T *, __INT1_T *, __INT_T *,
43 void f90_mm_int1_str1_vxm_(__INT1_T *, __INT1_T *, __INT1_T *, __INT_T *,
45 void f90_mm_int1_str1_(__INT1_T *, __INT1_T *, __INT1_T *, __INT_T *,
H A Dred_iany.c31 ARITHFN(|, iany_int1, __INT1_T, __INT1_T)
40 ARITHFNLKN(|, iany_int1, __INT1_T, __INT1_T, 1)
49 ARITHFNLKN(|, iany_int1, __INT1_T, __INT1_T, 2)
58 ARITHFNLKN(|, iany_int1, __INT1_T, __INT1_T, 4)
67 ARITHFNLKN(|, iany_int1, __INT1_T, __INT1_T, 8)
H A Dutil.c29 return (int)(*(__INT1_T *)b); in I8()
80 return (int)(*(__INT1_T *)b); in I8()
111 *(__INT1_T *)b = (__INT1_T)val; in I8()
208 val = (int)(*(__INT1_T *)tmp); in I8()
240 *(__INT1_T *)adr = (__INT1_T)val; in I8()
272 *vec = (int)(*(__INT1_T *)tmp); in I8()
304 *(__INT1_T *)adr = (__INT1_T)*vec; in I8()
H A Dmmulint1.c33 __INT1_T *s1_base; in ENTF90()
34 __INT1_T *s2_base; in ENTF90()
35 __INT1_T *dest_base; in ENTF90()
36 __INT1_T *d_elem_p; in ENTF90()
37 __INT1_T *s1_elem_p; in ENTF90()
38 __INT1_T *s2_elem_p; in ENTF90()
40 __INT1_T rslt_tmp; in ENTF90()
173 s1_base = (__INT1_T *)s1_addr + F90_LBASE_G(s1_desc) + in ENTF90()
175 s2_base = (__INT1_T *)s2_addr + F90_LBASE_G(s2_desc) + in ENTF90()
177 dest_base = (__INT1_T *)dest_addr + F90_LBASE_G(dest_desc) + in ENTF90()
H A Dconst.c64 sizeof(__INT1_T), /* F integer*1 */
153 static __INT1_T max_int1 = 0; /* initialized */
212 static __INT1_T min_int1 = 0; /* initialized */
271 static __INT1_T unit_int1 = 1;
326 static __INT1_T __fort_true_int1;
381 __INT1_T __fort_mask_int1;
506 __INT1_T
552 __set_fort_mask_int1(__INT1_T m) in __set_fort_mask_int1()
682 max_int1 = MAX_FOR_INT_TYPE(__INT1_T); in __fort_init_consts()
H A Dred_maxloc.c26 MLOCFNLKN(>, maxloc_int1, __INT1_T, 1)
35 MLOCFNLKN(>, maxloc_int1, __INT1_T, 2)
44 MLOCFNLKN(>, maxloc_int1, __INT1_T, 4)
53 MLOCFNLKN(>, maxloc_int1, __INT1_T, 8)
62 MLOCFNG(>, maxloc_int1, __INT1_T)
74 KMLOCFNLKN(>, kmaxloc_int1, __INT1_T, 1)
83 KMLOCFNLKN(>, kmaxloc_int1, __INT1_T, 2)
92 KMLOCFNLKN(>, kmaxloc_int1, __INT1_T, 4)
101 KMLOCFNLKN(>, kmaxloc_int1, __INT1_T, 8)
110 KMLOCFNG(>, kmaxloc_int1, __INT1_T)
H A Dred_findloc.c26 FLOCFNLKN(==, findloc_int1, __INT1_T, 1)
35 FLOCFNLKN(==, findloc_int1, __INT1_T, 2)
44 FLOCFNLKN(==, findloc_int1, __INT1_T, 4)
53 FLOCFNLKN(==, findloc_int1, __INT1_T, 8)
62 FLOCFNG(==, findloc_int1, __INT1_T)
74 KFLOCFNLKN(==, kfindloc_int1, __INT1_T, 1)
83 KFLOCFNLKN(==, kfindloc_int1, __INT1_T, 2)
92 KFLOCFNLKN(==, kfindloc_int1, __INT1_T, 4)
101 KFLOCFNLKN(==, kfindloc_int1, __INT1_T, 8)
110 KFLOCFNG(==, kfindloc_int1, __INT1_T)
H A Dred_minloc.c27 MLOCFNLKN(<, minloc_int1, __INT1_T, 1)
36 MLOCFNLKN(<, minloc_int1, __INT1_T, 2)
45 MLOCFNLKN(<, minloc_int1, __INT1_T, 4)
54 MLOCFNLKN(<, minloc_int1, __INT1_T, 8)
63 MLOCFNG(<, minloc_int1, __INT1_T)
75 KMLOCFNLKN(<, kminloc_int1, __INT1_T, 1)
84 KMLOCFNLKN(<, kminloc_int1, __INT1_T, 2)
93 KMLOCFNLKN(<, kminloc_int1, __INT1_T, 4)
102 KMLOCFNLKN(<, kminloc_int1, __INT1_T, 8)
111 KMLOCFNG(<, kminloc_int1, __INT1_T)
H A Dred_all.c32 LOGFN(&, all_int1, __INT1_T)
41 LOGFNLKN(&, all_int1, __INT1_T, 1)
50 LOGFNLKN(&, all_int1, __INT1_T, 2)
59 LOGFNLKN(&, all_int1, __INT1_T, 4)
68 LOGFNLKN(&, all_int1, __INT1_T, 8)
H A Dred_any.c32 LOGFN(|, any_int1, __INT1_T)
41 LOGFNLKN(|, any_int1, __INT1_T, 1)
50 LOGFNLKN(|, any_int1, __INT1_T, 2)
59 LOGFNLKN(|, any_int1, __INT1_T, 4)
68 LOGFNLKN(|, any_int1, __INT1_T, 8)
H A Dred_count.c63 COUNTFN(count_int1, __INT1_T)
72 COUNTFNLKN(count_int1, __INT1_T, 1)
81 COUNTFNLKN(count_int1, __INT1_T, 2)
90 COUNTFNLKN(count_int1, __INT1_T, 4)
99 COUNTFNLKN(count_int1, __INT1_T, 8)
H A Dred_maxval.c26 CONDFNLKN(>, maxval_int1, __INT1_T, 1)
35 CONDFNLKN(>, maxval_int1, __INT1_T, 2)
44 CONDFNLKN(>, maxval_int1, __INT1_T, 4)
53 CONDFNLKN(>, maxval_int1, __INT1_T, 8)
62 CONDFNG(>, maxval_int1, __INT1_T)
H A Dred_minval.c26 CONDFNLKN(<, minval_int1, __INT1_T, 1)
35 CONDFNLKN(<, minval_int1, __INT1_T, 2)
44 CONDFNLKN(<, minval_int1, __INT1_T, 4)
53 CONDFNLKN(<, minval_int1, __INT1_T, 8)
62 CONDFNG(<, minval_int1, __INT1_T)
H A Dred_sum.c83 ARITHFN(+, sum_int1, __INT1_T, long)
94 ARITHFNLKN(+, sum_int1, __INT1_T, long, 1)
105 ARITHFNLKN(+, sum_int1, __INT1_T, long, 2)
116 ARITHFNLKN(+, sum_int1, __INT1_T, long, 4)
127 ARITHFNLKN(+, sum_int1, __INT1_T, long, 8)
H A Dmiscsup_com.c876 __INT1_T f1, t1, m1; in ENTF90()
894 *(__INT1_T *)to = *(__INT1_T *)from; in ENTF90()
974 __INT1_T
1134 __INT1_T
1845 __INT1_T
1971 __INT1_T
2991 __INT1_T
2993 (__INT1_T *tsource, __INT1_T *fsource, void *mask, __INT_T *size)
3487 __INT1_T
4966 *(__INT1_T *)b = (__INT1_T)v;
[all …]
H A Dgathscat.c34 local_scatter_INT1(int n, __INT1_T *dst, int *sv, __INT1_T *src) in local_scatter_INT1()
193 local_gathscat_INT1(int n, __INT1_T *dst, int *sv, __INT1_T *src, int *gv) in local_gathscat_INT1()
H A Dgather.c24 local_gather_INT1(int n, __INT1_T *dst, __INT1_T *src, int *gv) in local_gather_INT1()
H A Dscalar_copy.c179 copy_int1(__INT1_T *rp, __INT1_T *sp, int size) in copy_int1()
H A Dgetarg.c294 *(__INT1_T *)b = (__INT1_T)v; in store_int_kind()
H A Dpack.c114 mval = (*(__INT1_T *)tmp & GET_DIST_MASK_INT1) != 0; in ENTFTN()
257 mval = (*(__INT1_T *)tmp & GET_DIST_MASK_INT1) != 0; in ENTFTN()
382 mval = (*(__INT1_T *)tmp & GET_DIST_MASK_INT1) != 0; in ENTFTN()
H A Dscatter_maxval.c27 scatter_maxval_int1(int n, __INT1_T *r, int *sv, __INT1_T *a) in scatter_maxval_int1()
121 gathscat_maxval_int1(int n, __INT1_T *r, int *sv, __INT1_T *a, int *gv) in gathscat_maxval_int1()
H A Dscatter_minval.c27 scatter_minval_int1(int n, __INT1_T *r, int *sv, __INT1_T *a) in scatter_minval_int1()
121 gathscat_minval_int1(int n, __INT1_T *r, int *sv, __INT1_T *a, int *gv) in gathscat_minval_int1()
H A DfortDt.h178 typedef signed char __INT1_T; /* 32 __INT1 integer*1 */ typedef
H A Dscatter.c1236 *((__INT1_T *)idx_array + i) = *((__INT1_T *)src + i) + adj; in I8()
1290 idx_len = sizeof(__INT1_T); in I8()
1317 *((__INT1_T *)idx_array + i) = *((__INT1_T *)ib); in I8()
H A Dred.c779 ((__INT1_T *)rb)[i] = *(__INT1_T *)zb; in I8()
972 ((__INT1_T *)rb)[i] = *(__INT1_T *)zb; in I8()
1163 ((__INT1_T *)rb)[i] = *(__INT1_T *)zb; in I8()

12