/dports/math/libpgmath/flang-d07daf3/tools/flang1/flang1exe/ |
H A D | rte.c | 229 mk_isz_cval(ub, astb.bnd.dtype); in sym_get_sdescr() 551 a = mk_binop(OP_SUB, a, mk_isz_cval(1, astb.bnd.dtype), astb.bnd.dtype); in get_all_descriptors() 825 subs[0] = mk_isz_cval(info, astb.bnd.dtype); in get_header_member() 859 subs[0] = mk_isz_cval(info, astb.bnd.dtype); in get_header_member_with_parent() 902 mk_isz_cval(DESC_HDR_LEN + dim * DESC_DIM_LEN + info, astb.bnd.dtype); in get_per_dim_member()
|
H A D | dtypeutl.c | 599 return mk_isz_cval(mlpyr * clen, astb.bnd.dtype); in size_ast() 604 len = mk_isz_cval(mlpyr, astb.bnd.dtype); in size_ast() 644 return mk_isz_cval(val1 * val2, astb.bnd.dtype); in size_ast() 654 return mk_isz_cval(4, astb.bnd.dtype); in size_ast() 656 return mk_isz_cval(DTY(dtype + 2), astb.bnd.dtype); in size_ast() 661 return mk_isz_cval(1, astb.bnd.dtype); in size_ast() 751 return mk_isz_cval(mlpyr * clen, astb.bnd.dtype); in size_ast_of() 797 return mk_isz_cval(val * val2, astb.bnd.dtype); in size_ast_of() 799 d = mk_isz_cval(d, astb.bnd.dtype); in size_ast_of() 810 return mk_isz_cval(4, astb.bnd.dtype); in size_ast_of() [all …]
|
H A D | dpm_out.c | 1903 sizeAst = mk_isz_cval(size_of(dtype), astb.bnd.dtype); in size_of_dtype() 2000 ARGT_ARG(argt, j) = mk_isz_cval(collapse, astb.bnd.dtype); in emit_secd() 2330 ARGT_ARG(argt, cargs++) = mk_isz_cval(0, astb.bnd.dtype); in emit_alnd() 2331 ARGT_ARG(argt, cargs++) = mk_isz_cval(0, astb.bnd.dtype); in emit_alnd() 3452 ARGT_ARG(newargt, 0) = mk_isz_cval(ndim, astb.bnd.dtype); in gen_ptr_in() 3453 ARGT_ARG(newargt, 1) = mk_isz_cval(kind, astb.bnd.dtype); in gen_ptr_in() 3776 gst = mk_isz_cval(ndim, astb.bnd.dtype); in make_sec_from_ast_chk() 3796 gst = mk_isz_cval(1, astb.bnd.dtype); in make_sec_from_ast_chk() 3905 ARGT_ARG(argt, cargs++) = mk_isz_cval(0, astb.bnd.dtype); in make_simple_template_from_ast() 4158 ast1 = mk_isz_cval(1, astb.bnd.dtype); in set_assumed_bounds() [all …]
|
H A D | symutl.c | 112 subs[0] = mk_isz_cval(get_byte_len_indx(), astb.bnd.dtype); in get_len_of_deferchar_ast() 355 AD_UPBD(ad, 0) = AD_UPAST(ad, 0) = mk_isz_cval(1, astb.bnd.dtype); in sym_get_sec() 356 AD_EXTNTAST(ad, 0) = mk_isz_cval(1, astb.bnd.dtype); in sym_get_sec() 460 AD_UPBD(ad, 0) = AD_UPAST(ad, 0) = mk_isz_cval(1, astb.bnd.dtype); in sym_get_arg_sec() 461 AD_EXTNTAST(ad, 0) = mk_isz_cval(1, astb.bnd.dtype); in sym_get_arg_sec() 500 mk_isz_cval(1, astb.bnd.dtype); in sym_get_formal() 1402 stride = mk_isz_cval(-1, astb.bnd.dtype); in fixup_allocd_tmp_bounds() 1443 stride = mk_isz_cval(-1, astb.bnd.dtype); in fixup_srcalloc_bounds() 1513 lb = mk_isz_cval(1, astb.bnd.dtype); in chk_assign_sptr() 3949 int subs = mk_isz_cval(get_byte_len_indx(), astb.bnd.dtype); in get_descriptor_length_ast() [all …]
|
H A D | outconv.c | 1495 insert_assign(get_desc_rank(sptrnewsd), mk_isz_cval(dims, astb.bnd.dtype), in _sect() 1587 ARGT_ARG(newargt, 1) = mk_isz_cval(f, dtype); in _sect() 1652 astextent = mk_isz_cval(extent, A_DTYPEG(astextent)); in _sect() 1675 mk_isz_cval(-1, A_DTYPEG(aststride)), DT_LOG); in _sect() 1917 ARGT_ARG(newargt, 1) = mk_isz_cval(f, dtype); in _sect() 1945 ARGT_ARG(newargt, 1) = mk_isz_cval(f, dtype); in _sect() 1992 insert_assign(get_desc_tag(sptrnewsd), mk_isz_cval(TAGDESC, dtype), in _sect() 2076 insert_assign(get_desc_rank(sptrnewsd), mk_isz_cval(rank, astb.bnd.dtype), in _template() 2114 astextent = mk_isz_cval(extent, A_DTYPEG(astextent)); in _template() 2191 insert_assign(get_desc_tag(sptrnewsd), mk_isz_cval(TAGDESC, dtype), in _template() [all …]
|
H A D | comm.c | 1525 mk_isz_cval(dtype_to_arg(DTYPEG(dest_sptr)), astb.bnd.dtype); in transform_ptr() 1536 mk_isz_cval(size_of(DDTG(DTYPEG(dest_sptr))), astb.bnd.dtype); in transform_ptr() 1538 mk_isz_cval(ty_to_lib[DTYG(DTYPEG(dest_sptr))], astb.bnd.dtype); in transform_ptr() 2007 ARGT_ARG(argt, 4 + i) = mk_isz_cval(order2[i] + 1, astb.bnd.dtype); in emit_permute_section() 2148 subs[i] = mk_isz_cval(1, astb.bnd.dtype); in permute_axis() 2163 permute[i] = mk_isz_cval(per[i], astb.bnd.dtype); in permute_axis() 2231 mk_isz_cval(no, astb.bnd.dtype); in put_data() 2442 subs[i] = mk_isz_cval(1, astb.bnd.dtype); in emit_sum_scatterx() 2710 subs[i] = mk_isz_cval(1, astb.bnd.dtype); in emit_scatterx_gatherx() 3107 ns = mk_isz_cval(SUBI_NOP(subinfo + i), astb.bnd.dtype); in emit_overlap() [all …]
|
H A D | rest.c | 634 mk_isz_cval(-43, astb.bnd.dtype); in declare_type() 635 ADD_UPBD(dtype, 0) = ADD_UPAST(dtype, 0) = mk_isz_cval(43, astb.bnd.dtype); in declare_type() 637 ADD_NUMELM(dtype) = mk_isz_cval(67, astb.bnd.dtype); in declare_type() 697 ast = mk_isz_cval(__pghpf_type[ss + 43], astb.bnd.dtype); in pghpf_type() 700 ast = mk_isz_cval(ss, astb.bnd.dtype); in pghpf_type() 1022 a = mk_binop(OP_SUB, a, mk_isz_cval(1, astb.bnd.dtype), astb.bnd.dtype); in copy_desc_to_bnds_vars() 3433 glb = mk_isz_cval(1, astb.bnd.dtype); in first_element_from_section()
|
H A D | semutil2.c | 440 AD_MLPYR(ad, i) = mk_isz_cval(last_mp, astb.bnd.dtype); in _mk_arrdsc() 572 AD_ZBASE(ad) = mk_isz_cval(zbase, astb.bnd.dtype); in _mk_arrdsc() 3077 i = mk_isz_cval(cnt, astb.bnd.dtype); in _constructf90() 6881 int a = mk_isz_cval(d, astb.bnd.dtype); in build_array_list() 6887 int a = mk_isz_cval(d, astb.bnd.dtype); in build_array_list() 12027 subs[0] = mk_isz_cval(info, astb.bnd.dtype); in get_header_member() 12080 ARGT_ARG(argt, 1) = mk_isz_cval(ndims, astb.bnd.dtype); in init_sdsc() 12081 ARGT_ARG(argt, 2) = mk_isz_cval(0, astb.bnd.dtype); in init_sdsc() 12104 ARGT_ARG(argt, 4) = mk_isz_cval(0, astb.bnd.dtype); in init_sdsc() 12159 ARGT_ARG(argt, 2) = mk_isz_cval(0, astb.bnd.dtype); in init_sdsc_bounds() [all …]
|
H A D | ast.c | 600 mk_isz_cval(ISZ_T v, DTYPE dtype) in mk_isz_cval() function 2125 newupb = mk_binop(OP_SUB, newupb, mk_isz_cval(1, A_DTYPEG(extnt)), in mk_mem_ptr_shape() 2221 return mk_isz_cval(0, resdtype); in mk_offset() 2256 offsetx = mk_binop(OP_ADD, offsetx, mk_isz_cval(ADDRESSG(sptr), resdtype), in mk_offset() 2261 return mk_isz_cval(0, resdtype); in mk_offset() 2600 extent_expr = mk_isz_cval( in mk_extent_expr() 2622 extent = mk_isz_cval(ad_val_of(A_SPTRG(ub)) - ad_val_of(A_SPTRG(lb)) + 1, in mk_extent() 2650 extent = mk_isz_cval(ad_val_of(A_SPTRG(ub)) - ad_val_of(A_SPTRG(lb)) + 1, in mk_shared_extent() 3529 bytes = mk_isz_cval(size_of(dtype), astb.bnd.dtype); in elem_size_of_ast() 3541 bytes = mk_isz_cval(size_of(dtype), astb.bnd.dtype); in elem_size_of_ast() [all …]
|
H A D | commgen.c | 1024 st = mk_isz_cval(1, astb.bnd.dtype); in generate_hlocalizebnds() 1175 st = mk_isz_cval(1, astb.bnd.dtype); in generate_hcycliclp() 1521 ARGT_ARG(argt, 1) = mk_isz_cval(dim + 1, astb.bnd.dtype); in gen_localize_index()
|
H A D | semfunc.c | 5995 mk_isz_cval(rank_of_ast(ARG_AST(0)), astb.bnd.dtype); in ref_pd() 6107 mk_isz_cval(rank_of_ast(ARG_AST(0)), astb.bnd.dtype); in ref_pd() 6398 mk_isz_cval(rank_of_ast(ARG_AST(0)), astb.bnd.dtype); in ref_pd() 6675 ARG_AST(0) = mk_isz_cval((INT)count, astb.bnd.dtype); /* rank */ in ref_pd() 6699 mk_isz_cval(rank_of_ast(ARG_AST(0)), astb.bnd.dtype); in ref_pd() 6704 ARG_AST(1) = mk_isz_cval((INT)count, astb.bnd.dtype); /* rank */ in ref_pd() 7283 mk_isz_cval(count, astb.bnd.dtype); in ref_pd() 7319 add_arg(mk_isz_cval((INT)count, astb.bnd.dtype)); /* rank */ in ref_pd() 9839 size_ast = mk_isz_cval(size, astb.bnd.dtype); in ref_pd() 10907 ast = mk_isz_cval(iszval, dtyper); in ref_pd()
|
H A D | detect.c | 1392 *stride = mk_isz_cval(1, astb.bnd.dtype); in search_idx()
|
H A D | semsmp.c | 9228 AD_UPBD(ad, 0) = AD_UPAST(ad, 0) = mk_isz_cval(4, astb.bnd.dtype); in get_csect_sym() 9229 AD_EXTNTAST(ad, 0) = mk_isz_cval(8, astb.bnd.dtype); in get_csect_sym() 9247 AD_UPBD(ad, 0) = AD_UPAST(ad, 0) = mk_isz_cval(16, astb.bnd.dtype); in get_csect_sym() 9248 AD_EXTNTAST(ad, 0) = mk_isz_cval(16, astb.bnd.dtype); in get_csect_sym()
|
H A D | semantio.c | 1162 i = mk_isz_cval(size_of(dtype), DT_INT8); in semantio() 1433 ast3 = mk_isz_cval(size_of(dtype), DT_INT8); in semantio()
|
H A D | func.c | 986 return mk_isz_cval((ISZ_T)-1, astb.bnd.dtype); in stride_one() 1683 int tag = mk_isz_cval(intrin_type ? __TAGPOLY : __TAGDESC, DT_INT); in check_alloc_ptr_type() 4609 arr_desc = mk_isz_cval(ty, astb.bnd.dtype); in transform_associated()
|
H A D | datadep.c | 153 #define ad_icon(i) (mk_isz_cval(i, astb.bnd.dtype))
|
H A D | semfin.c | 273 mk_isz_cval(get_descriptor_len(0), astb.bnd.dtype); in add_class_arg_descr_arg()
|
H A D | transfrm.c | 1478 if (oldstride == mk_isz_cval(-1, astb.bnd.dtype)) { in normalize_subscript()
|
H A D | semutil.c | 4193 seqast = mk_isz_cval(__SEQUENTIAL_SECTION, DT_INT); in inline_contig_check()
|
H A D | semant.c | 6067 mk_isz_cval(sem.bounds[sem.arrdim.ndim].upb, astb.bnd.dtype); in semant1() 15361 bndast = mk_binop(OP_ADD, bndast, mk_isz_cval(1, astb.bnd.dtype), in put_length_type_param()
|
/dports/math/libpgmath/flang-d07daf3/tools/flang1/utils/ast/ |
H A D | ast.in.h | 354 int mk_isz_cval (ISZ_T, DTYPE);
|