Home
last modified time | relevance | path

Searched refs:sym_of_ast (Results 1 – 25 of 30) sorted by relevance

12

/dports/math/libpgmath/flang-d07daf3/tools/flang1/flang1exe/
H A Dcommopt.c817 sptr = sym_of_ast(src); in Conflict_()
818 sptr1 = sym_of_ast(conf.src); in Conflict_()
1021 lhs_sptr = sym_of_ast(lhs); in is_fusable()
1053 lhs_sptr1 = sym_of_ast(lhs1); in is_fusable()
3100 int dest_sym = sym_of_ast(dest); in is_allocatable_assign()
3121 sptr = sym_of_ast(A_DESTG(ast)); in propagate_bound()
3338 old_sptr = sym_of_ast(old_lwb); in rewrite_all_shape()
3349 old_sptr = sym_of_ast(old_upb); in rewrite_all_shape()
3360 old_sptr = sym_of_ast(old_st); in rewrite_all_shape()
3517 psptr = sym_of_ast(arg); in put_forall_pcalls()
[all …]
H A Ddinit.c266 num_elem = get_int_cval(sym_of_ast(AD_NUMELM(AD_PTR(sptr)))); in dinit_data()
287 num_elem = get_int_cval(sym_of_ast(AD_NUMELM(AD_PTR(memptr)))); in dinit_data()
1386 lwbd = get_int_cval(sym_of_ast(AD_LWAST(ad, i))); in find_base()
1388 if (offset < lwbd || offset > get_int_cval(sym_of_ast(AD_UPAST(ad, i)))) { in find_base()
1558 sptr = sym_of_ast(ivl->u.varref.ptr); in mark_ivl_dinit()
H A Dextern.h52 int sym_of_ast(int ast); /* ast.c */
H A Dsemfin.c1709 get_int_cval(sym_of_ast(AD_LWAST(ad, dim)))) * in chk_evar()
1710 get_int_cval(sym_of_ast(AD_MLPYR(ad, dim))); in chk_evar()
1728 if (val < get_int_cval(sym_of_ast(AD_LWAST(ad, dim))) || in chk_evar()
1729 val > get_int_cval(sym_of_ast(AD_UPAST(ad, dim)))) in chk_evar()
2506 PUT(get_int_cval(sym_of_ast(AD_LWAST(ad, cnt)))); in nml_emit_desc()
2507 PUT(get_int_cval(sym_of_ast(AD_UPAST(ad, cnt)))); in nml_emit_desc()
2535 from = mk_id(sym_of_ast(AD_LWAST(ad, cnt))); in nml_emit_desc()
2544 PUT(get_int_cval(sym_of_ast(AD_LWAST(ad, cnt)))); in nml_emit_desc()
2551 from = mk_id(sym_of_ast(AD_UPAST(ad, cnt))); in nml_emit_desc()
2559 PUT(get_int_cval(sym_of_ast(AD_UPAST(ad, cnt)))); in nml_emit_desc()
H A Drest.c875 ele = remove_subscript_expressions(ele, std, sym_of_ast(ele)); in transform_section_arg()
1169 if (sptr3 != sym_of_ast(A_LOPG(ast)) && CLASSG(sptr3) && in transform_call()
1280 if (A_TYPEG(ele) == A_ID && IS_PROC(STYPEG(sym_of_ast(ele))) ) { in transform_call()
1290 if (A_TYPEG(ele) == A_ID && IS_PROC(STYPEG(sym_of_ast(ele))) ) { in transform_call()
1291 int proc = sym_of_ast(ele); in transform_call()
1352 IS_PROC(STYPEG(sym_of_ast(ele)))) { in transform_call()
1354 int tmp = get_proc_ptr(sym_of_ast(ele)); in transform_call()
1355 if (INTERNALG(sym_of_ast(ele))) { in transform_call()
1487 SPTR fval = FVALG(sym_of_ast(A_LOPG(ele))); in transform_call()
2424 sptr = sym_of_ast(arr); in check_nonseq_element()
[all …]
H A Dsemant3.c312 sptr = sym_of_ast(A_LOPG(ast)); in semant3()
1077 sp = sym_of_ast(ast); in semant3()
1129 sp = sym_of_ast(ast); in semant3()
1162 sp = sym_of_ast(ast); in semant3()
4808 err_protected(sym_of_ast(o_ast), in semant3()
5143 sptr = sym_of_ast(itemp->ast); in semant3()
5166 sptr = sym_of_ast(itemp->ast); in semant3()
5620 if (is_protected(sym_of_ast(ast))) { in semant3()
5745 sptr = sym_of_ast(ast); in check_doconcurrent_ast()
5946 sptr = sym_of_ast(A_SRCG(ast)); in check_doconcurrent_ast()
[all …]
H A Ddtypeutl.c194 d = sym_of_ast(d); in size_of()
625 d = sym_of_ast(ADD_NUMELM(dtype)); in size_ast()
639 dd = sym_of_ast(len); in size_ast()
779 d = sym_of_ast(ADD_NUMELM(dtype)); in size_ast_of()
792 dd = sym_of_ast(len); in size_ast_of()
1077 d = sym_of_ast(AD_NUMELM(ad)); in extent_of()
2328 strcat(string, getprint(sym_of_ast(ast))); in getast()
2331 sprintf(b, "\\%d", sym_of_ast(ast)); in getast()
H A Dtransfrm.c2399 dscast = sym_of_ast(astmem); in make_forall()
2724 lhs_sptr = sym_of_ast(lhs); in use_lhs_for_user_func()
3038 SPTR sptr = sym_of_ast(ast); in build_sdsc_node()
4100 parentDestSptr = sym_of_ast(astdest); in rewrite_allocatable_assignment()
4144 parentSrcSptr = sym_of_ast(astsrc); in rewrite_allocatable_assignment()
4240 sym_of_ast(astdest), astsrc, src_sdsc_ast); in rewrite_allocatable_assignment()
4313 sptr = sym_of_ast(A_LOPG(A_PARENTG(astsrc))); in rewrite_allocatable_assignment()
4315 sptr = ast_is_sym(astsrc) ? sym_of_ast(astsrc) : 0; in rewrite_allocatable_assignment()
H A Dsemutil2.c648 ASSNP(sym_of_ast(lb), 1); in gen_defer_shape()
670 ASSNP(sym_of_ast(ub), 1); in gen_defer_shape()
694 ASSNP(sym_of_ast(ADD_EXTNTAST(dt, i)), 1); in gen_defer_shape()
1417 dim_size = ad_val_of(sym_of_ast(AD_UPAST(ad, i))) - in size_of_array()
10321 o_lowb = ad_val_of(sym_of_ast(AD_LWAST(adsc, 0))); in eval_sub_index()
11489 objectsptr = sym_of_ast(object); in gen_alloc_dealloc()
11498 sptr = sym_of_ast(itemp->ast); in gen_alloc_dealloc()
11596 int sptr = sym_of_ast(ast); in check_and_add_auto_dealloc_from_ast()
11861 newast = get_parm_ast(parent, sym_of_ast(ast), DTYPEG(sym_of_ast(parent))); in add_parent_to_bounds()
12216 int parentDty = DTYPEG(sym_of_ast(parentMem)); in genPolyAsn()
[all …]
H A Dsemantio.c1073 set_assn(sym_of_ast(SST_ASTG(stkptr))); in semantio()
1075 set_assn(sym_of_ast(SST_ASTG(stkptr))); in semantio()
1251 set_assn(sym_of_ast(SST_ASTG(stkptr))); in semantio()
1253 set_assn(sym_of_ast(SST_ASTG(stkptr))); in semantio()
1733 set_assn(sym_of_ast(SST_ASTG(RHS(3)))); in semantio()
1759 set_assn(sym_of_ast(SST_ASTG(RHS(3)))); in semantio()
4581 sptr = sym_of_ast(SST_ASTG(stk)); in chk_unitid()
5633 error(453, 3, gbl.lineno, SYMNAME(sym_of_ast(ast)), ""); in add_iolptrs()
H A Dlowerilm.c995 tbp_pass_arg = sym_of_ast(A_LOPG(ast)); in handle_arguments()
1018 A_INVOKING_DESCG(ast) ? sym_of_ast(A_INVOKING_DESCG(ast)) : 0; in handle_arguments()
1342 sdsc = A_INVOKING_DESCG(ast) ? sym_of_ast(A_INVOKING_DESCG(ast)) : 0; in handle_arguments()
1390 psptr = sym_of_ast(a); in handle_arguments()
1398 sdsc = A_INVOKING_DESCG(ast) ? sym_of_ast(A_INVOKING_DESCG(ast)) : 0; in handle_arguments()
1423 int sdsc = A_INVOKING_DESCG(ast) ? sym_of_ast(A_INVOKING_DESCG(ast)) in handle_arguments()
1440 int sdsc = A_INVOKING_DESCG(ast) ? sym_of_ast(A_INVOKING_DESCG(ast)) in handle_arguments()
2991 sptr = sym_of_ast(src); in lower_stmt()
4621 sptr = sym_of_ast(lop); in lower_stmt()
H A Dvsub.c1621 sptrlhs = sym_of_ast(lhs); in scalar_lhs_dependency()
1924 if (sptr != sym_of_ast(expr)) { in take_out_assumsz_array()
2107 sptrlhs = sym_of_ast(lhs); in forall_bound_dependence()
H A Dredundss.c685 sptr = sym_of_ast(A_SRCG(ast)); in markmodified()
704 sptr = sym_of_ast(A_SRCG(ast)); in markmodified()
H A Dsemant2.c784 sp = sym_of_ast(ast); in semant2()
940 sp = sym_of_ast(ast); in semant2()
958 if (pass_sym_of_ast(ast) != sym_of_ast(ast)) { in semant2()
H A Doutconv.c347 int sptr = sym_of_ast(A_SRCG(ast)); in convert_omp_workshare()
409 lsptr = sym_of_ast(A_DESTG(ast)); in convert_omp_workshare()
2713 sptrsd = sym_of_ast(tempsd); in convert_template_instance()
3242 sptr = sym_of_ast(expr); in is_same_mask()
3243 sptr1 = sym_of_ast(expr1); in is_same_mask()
3506 astCall = begin_call(A_CALL, sym_of_ast(A_LOPG(astBlock)), 8); in conv_forall()
3977 sptr_lhs = sym_of_ast(lhs); in forall_dependency()
H A Dsemfunc.c711 ADDRTKNP(sym_of_ast(ast), 1); in gen_and_assoc_tmp_ptr()
1063 sym = sym_of_ast(return_value); in func_call2()
1073 CLASSP(sym_of_ast(return_value), CLASSG(FVALG(func_sptr))); in func_call2()
3539 sptr = sym_of_ast(ast); in subr_call2()
7001 sptr = sym_of_ast(ARG_AST(0)); /* intent OUT arg */ in ref_pd()
7352 count = get_int_cval(sym_of_ast(AD_NUMELM(AD_DPTR(dtype1)))); in ref_pd()
7421 count != get_int_cval(sym_of_ast(AD_NUMELM(AD_DPTR(dtype2))))) { in ref_pd()
7451 count != get_int_cval(sym_of_ast(AD_NUMELM(AD_DPTR(dtype2))))) { in ref_pd()
11360 sptr = sym_of_ast(ARG_AST(0)); /* the HARVEST arg */ in ref_pd_subr()
11387 sptr = sym_of_ast(ARG_AST(2)); /* intent OUT arg */ in ref_pd_subr()
[all …]
H A Dfunc.c2233 is_back_true = get_int_cval(sym_of_ast(back)); in rewrite_func_ast()
2359 ARGT_ARG(newargt, 2) = size_ast(sym_of_ast(mask), DDTG(A_DTYPEG(mask))); in rewrite_func_ast()
2908 sptr = sym_of_ast(arg_gbl.lhs); in rewrite_func_ast()
3729 if (!ast_is_sym(lhs) || !ALLOCATTRG(sym_of_ast(lhs))) in allocate_lhs_if_needed()
3838 sptr_lhs = sym_of_ast(lhs); in rewrite_calls()
3847 sptr_lhs = sym_of_ast(lhs); in rewrite_calls()
6461 (sym_of_ast(dest) != pass_sym_of_ast(dest)) in inline_reduction_f90()
H A Dsemfunc2.c2395 if (eldact == 0 && STYPEG(sym_of_ast(actual)) == ST_PROC && in chk_arguments()
2577 if (is_protected(sym_of_ast(actual))) { in chk_arguments()
H A Dlowerexp.c1880 A_INVOKING_DESCG(ast) ? sym_of_ast(A_INVOKING_DESCG(ast)) : 0; in lower_function()
2209 int sdsc = A_INVOKING_DESCG(ast) ? sym_of_ast(A_INVOKING_DESCG(ast)) in lower_function()
2233 sdsc = A_INVOKING_DESCG(ast) ? sym_of_ast(A_INVOKING_DESCG(ast)) : 0; in lower_function()
H A Dsemutil.c1748 set_assn(sym_of_ast(lval)); in mklvalue()
3462 sym = sym_of_ast(lhs); in subst_lhs_arrfn()
3754 set_assn(sym_of_ast(dest)); in assign_intrinsic_to_pointer()
3786 set_assn(sym_of_ast(A_LOPG(SST_ASTG(stktop)))); in assign_pointer()
H A Dsemsym.c1368 sptr = sym_of_ast(astx); in mark_static()
H A Dast.c2694 sym_of_ast(int ast) in sym_of_ast() function
3412 sptr = sym_of_ast(arr_ast); in simply_contiguous()
3417 sptr = sym_of_ast(arr_ast); in simply_contiguous()
3422 sptr = sym_of_ast(arr_ast); in simply_contiguous()
H A Dcomm.c603 sptr = sym_of_ast(A_DESTG(astStmt)); in record_barrier()
608 sptr = sym_of_ast(A_DESTG(A_IFSTMTG(astStmt))); in record_barrier()
H A Dinliner.c1695 sptr = sym_of_ast(ast1); in replace_parms()
/dports/math/libpgmath/flang-d07daf3/tools/flang1/utils/ast/
H A Dast.in.h391 int sym_of_ast (int);

12