/dports/math/libpgmath/flang-d07daf3/tools/flang1/flang1exe/ |
H A D | semant2.c | 444 SST_ASTP(LHS, mk_cval1(SST_CVALG(LHS), (int)SST_DTYPEG(LHS))); in semant2() 2109 ast = mk_cval1(SST_CVALG(LHS), (int)SST_DTYPEG(LHS)); in semant2() 2188 ast = mk_cval1(SST_CVALG(RHS(2)), (int)SST_DTYPEG(RHS(2))); in semant2() 2222 ast = mk_cval1(SST_CVALG(LHS), (int)SST_DTYPEG(LHS)); in semant2() 2298 ast = mk_cval1(SST_CVALG(LHS), (int)SST_DTYPEG(LHS)); in semant2() 2430 ast = mk_cval1(SST_CVALG(LHS), (int)SST_DTYPEG(LHS)); in semant2() 2526 ast = mk_cval1(SST_CVALG(LHS), (int)SST_DTYPEG(LHS)); in semant2() 2571 ast = mk_cval1(SST_CVALG(LHS), (int)SST_DTYPEG(LHS)); in common_rel() 2611 ast = mk_cval1(sptr, DT_LOG8); in log_negation() 2615 ast = mk_cval1(SST_CVALG(LHS), DT_LOG4); in log_negation() [all …]
|
H A D | semant3.c | 2344 flag_con = mk_cval1(flag, DT_INT); in semant3() 2346 zero = mk_cval1(0, DT_INT); in semant3() 2351 rslt = mk_cval1(-1, DT_INT); in semant3() 2362 sdsc2 = mk_cval1(sdsc2, DT_INT); in semant3() 3853 val = mk_cval1(string_length(dtype), DT_INT); in semant3() 3891 arg1 = mk_cval1(type_code, DT_INT); in semant3() 4187 src_sdsc_ast = mk_cval1(0, DT_INT); in semant3() 4272 val = mk_cval1(35, DT_INT); in semant3() 4277 val = mk_cval1(0, DT_INT); in semant3() 4306 flag_con = mk_cval1(flag_con, DT_INT); in semant3() [all …]
|
H A D | ast.c | 586 return mk_cval1(getcon(v1, DT_INT8), DT_INT8); in mk_cval() 594 return mk_cval1(getcon(v1, DT_LOG8), DT_LOG8); in mk_cval() 596 return mk_cval1(v, dtype); in mk_cval() 606 return mk_cval1(getcon(num, DT_INT8), DT_INT8); in mk_isz_cval() 621 mk_cval1(INT v, DTYPE dtype) in mk_cval1() function 1727 cnst = mk_cval1(result, newtyp); in convert_cnst() 7170 ast = mk_cval1(val[0], DT_INT4); in _huge() 7175 ast = mk_cval1(tmp, DT_INT8); in _huge() 7179 ast = mk_cval1(val[0], DT_REAL4); in _huge() 7277 return (mk_cval1(tmp, DT_INT8)); in mk_smallest_val() [all …]
|
H A D | semutil2.c | 5568 SST_ASTP(e1, mk_cval1(i, DT_INT)); in get_keyword_components() 5576 SST_ASTP(e1, mk_cval1(i, DT_INT)); in get_keyword_components() 5619 SST_ASTP(e1, mk_cval1(i, DT_INT)); in get_keyword_components() 5627 SST_ASTP(e1, mk_cval1(i, DT_INT)); in get_keyword_components() 6475 ast = mk_cval1(val, dtype); in dinit_getval() 6492 ast = mk_cval1(aval, A_DTYPEG(ast)); in dinit_getval1() 6508 ast = mk_cval1(val, dtype); in dinit_getval1() 7141 aast = mk_cval1(a->conval, a->dtype); in dinit_fill_struct() 12241 flag_con = mk_cval1(1, DT_INT); in genPolyAsn() 12326 con = mk_cval1(val, DT_INT); in gen_kind_parm_assignments() [all …]
|
H A D | func.c | 466 return mk_cval1(V, dtype); in _makezero() 475 return mk_cval1((INT)sptr, dtype); in _makezero() 486 return mk_cval1(sptr, dtype); in _makezero() 492 return mk_cval1(sptr, dtype); in _makezero() 1391 type2 = mk_cval1(type2, DT_INT); in check_pointer_type() 1551 val = mk_cval1(43, DT_INT); in check_pointer_type() 1657 type2_ast = mk_cval1(dtype_to_arg(dt1), DT_INT); in check_alloc_ptr_type() 6976 ARGT_ARG(newargt, 0) = add_byval(mk_cval1(ta, DT_INT4)); in mmul() 6977 ARGT_ARG(newargt, 1) = add_byval(mk_cval1(tb, DT_INT4)); in mmul()
|
H A D | semutil.c | 419 mk_alias(ast, mk_cval1(SST_CVALG(old), newtyp)); in cngtyp2() 2845 ast = mk_cval1(conval, (int)A_DTYPEG(ast)); in ref_array() 3953 type_code = mk_cval1(type_code, DT_INT); in gen_poly_element_arg() 4262 lineno = mk_cval1(srcLine, DT_INT); in gen_contig_check() 4297 argFlags = mk_cval1( ignoreNullTargets ? 1 : 0, DT_INT); in gen_contig_check() 4823 SST_ASTP(rop, mk_cval1(pw, DT_INT4)); in chkopnds() 4844 SST_ASTP(rop, mk_cval1(pw, DT_INT4)); in chkopnds()
|
H A D | semfunc.c | 5095 ast = mk_cval1(conval, dtype); in ref_intrin() 8770 ARG_AST(1) = mk_cval1(target_kind(dtyper), DT_INT4); in ref_pd() 8810 ARG_AST(1) = mk_cval1(target_kind(dtyper), DT_INT4); in ref_pd() 8866 ARG_AST(1) = mk_cval1(target_kind(dtyper), DT_INT4); in ref_pd() 8960 ARG_AST(1) = mk_cval1(target_kind(dtyper), DT_INT4); in ref_pd() 9036 ARG_AST(2) = mk_cval1(target_kind(dtyper), DT_INT4); in ref_pd() 9170 ast = mk_cval1(conval, dtyper); in ref_pd() 9185 ast = mk_cval1(conval, dtyper); in ref_pd() 10129 ast = mk_cval1(flag, DT_INT); in ref_pd() 10230 flag_con = mk_cval1(flag, DT_INT); in ref_pd() [all …]
|
H A D | rest.c | 2193 val = mk_cval1(tag, DT_INT); in set_descr_tag() 2290 val = mk_cval1(string_length(dtype), DT_INT); in temp_type_descriptor() 2302 val = mk_cval1(0, DT_INT); in temp_type_descriptor() 2315 val = mk_cval1(__TAGPOLY, DT_INT); in temp_type_descriptor()
|
H A D | dtypeutl.c | 3670 return mk_cval1(val, DT_INT); in chk_kind_parm_set_expr() 3680 return mk_cval1(i, DT_INT); in chk_kind_parm_set_expr() 3705 ast = mk_cval1(i, DT_INT); in chk_kind_parm_set_expr()
|
H A D | transfrm.c | 3297 int flag_con = mk_cval1(1, DT_INT); in build_poly_func_node() 3304 flag_con = mk_cval1(0, DT_INT); in build_poly_func_node() 4275 flag_ast = mk_cval1(flag_con, DT_INT); in rewrite_allocatable_assignment()
|
H A D | semant.c | 6006 ast = mk_cval1(conval, (int)A_DTYPEG(ast)); in semant1() 6515 alias = mk_cval1(CONVAL1G(sptr), (int)DTYPEG(sptr)); in semant1() 6561 alias = mk_cval1(CONVAL1G(sptr), (int)DTYPEG(sptr)); in semant1() 7265 mk_alias(ast, mk_cval1(SST_CVALG(LHS), (int)SST_DTYPEG(LHS))); in semant1() 7437 ast = mk_cval1(SST_CVALG(LHS), DT_LOG); in semant1() 7447 ast = mk_cval1(SST_CVALG(LHS), DT_LOG); in semant1() 12878 alias = mk_cval1(conval, (int)DTYPEG(param_sptr)); in get_param_alias_const() 14891 ast = mk_cval1(value, DT_INT); in fix_kind_parm_expr()
|
H A D | semsmp.c | 7368 ast = mk_cval1(conval, dtype); in do_reduction() 8098 ast = mk_cval1(SST_CVALG(&op1), (int)SST_DTYPEG(&op1)); in gen_reduction() 8276 i2 = mk_cval1(DI_SECT_CNT(doif), DT_INT4); in end_lastprivate() 8958 ast = mk_cval1(v, d); in assign_cval()
|
H A D | dpm_out.c | 2223 type_ast = mk_unop(OP_VAL, mk_cval1(dtype_arg_ast, DT_INT), DT_INT); in set_type_in_descriptor()
|
H A D | interf.c | 5756 alias = mk_cval1(CONVAL1G(sptr), DTYPEG(sptr)); in fill_links_symbol()
|
/dports/math/libpgmath/flang-d07daf3/tools/flang1/utils/ast/ |
H A D | ast.in.h | 355 int mk_cval1 (INT, DTYPE);
|