Searched refs:ffeinfo_kindtype (Results 1 – 14 of 14) sorted by relevance
354 && (ffeinfo_kindtype (i) == FFEINFO_kindtypeNONE) in ffeintrin_check_()408 okay &= anynum || (ffeinfo_kindtype (i) == akt); in ffeintrin_check_()412 okay &= anynum || (ffeinfo_kindtype (i) == firstarg_kt); in ffeintrin_check_()422 || ffeinfo_kindtype (i) == FFEINFO_kindtypeINTEGER2 in ffeintrin_check_()423 || ffeinfo_kindtype (i) == FFEINFO_kindtypeINTEGER3); in ffeintrin_check_()429 || ffeinfo_kindtype (i) == FFEINFO_kindtypeLOGICAL2 in ffeintrin_check_()430 || ffeinfo_kindtype (i) == FFEINFO_kindtypeLOGICAL3); in ffeintrin_check_()672 col_kt = ffeinfo_kindtype (i); in ffeintrin_check_()679 ffeinfo_kindtype (i), in ffeintrin_check_()968 && (ffeinfo_kindtype (i) == FFEINFO_kindtypeNONE) in ffeintrin_check_()[all …]
7176 ffeinfo_kindtype (info), in ffeexpr_convert_expr()10023 rkt = ffeinfo_kindtype (rinfo); in ffeexpr_reduced_bool1_()10109 lkt = ffeinfo_kindtype (linfo); in ffeexpr_reduced_bool2_()10116 rkt = ffeinfo_kindtype (rinfo); in ffeexpr_reduced_bool2_()10271 lkt = ffeinfo_kindtype (linfo); in ffeexpr_reduced_concatenate_()10280 rkt = ffeinfo_kindtype (rinfo); in ffeexpr_reduced_concatenate_()10447 lkt = ffeinfo_kindtype (linfo); in ffeexpr_reduced_eqop2_()13074 = (ffeinfo_kindtype (info) in ffeexpr_finished_()15197 ffeinfo_kindtype (info), in ffeexpr_token_name_lhs_()18798 ffeinfo_kindtype (info), in ffeexpr_token_elements_()[all …]
423 assert (ffeinfo_kindtype (ffebld_info (size)) in ffedata_advance_()482 assert (ffeinfo_kindtype (ffebld_info (size)) in ffedata_advance_()550 assert (ffeinfo_kindtype (ffebld_info (size)) in ffedata_advance_()591 assert (ffeinfo_kindtype (ffebld_info (itervar)) in ffedata_advance_()605 assert (ffeinfo_kindtype (ffebld_info (start)) in ffedata_advance_()619 assert (ffeinfo_kindtype (ffebld_info (end)) in ffedata_advance_()638 assert (ffeinfo_kindtype (ffebld_info (incr)) in ffedata_advance_()1018 sub_kind = ffeinfo_kindtype (ffebld_info (subscript)); in ffedata_eval_offset_()1041 low_kind = ffeinfo_kindtype (ffebld_info (low)); in ffedata_eval_offset_()1057 hi_kind = ffeinfo_kindtype (ffebld_info (high)); in ffedata_eval_offset_()[all …]
135 || (ffeinfo_kindtype (imp->info) != kind_type) in ffeimplic_establish_initial()191 ffeinfo_kindtype (imp->info), in ffeimplic_establish_symbol()
280 ffeinfo_kindtype (ffebld_info in ffestt_dimlist_as_expr()282 ffeinfo_kindtype (ffebld_info in ffestt_dimlist_as_expr()310 ffeinfo_kindtype (ffebld_info (ext)), in ffestt_dimlist_as_expr()351 ffeinfo_kindtype (ffebld_info (as)), in ffestt_dimlist_as_expr()352 ffeinfo_kindtype (ffebld_info (ext))); in ffestt_dimlist_as_expr()
154 #define ffeinfo_kindtype(i) (i.kindtype) macro
707 assert (ffeinfo_kindtype (ffebld_info (subscript)) in ffeequiv_offset_()729 assert (ffeinfo_kindtype (ffebld_info (low)) in ffeequiv_offset_()741 assert (ffeinfo_kindtype (ffebld_info (high)) in ffeequiv_offset_()804 assert (ffeinfo_kindtype (ffebld_info (begin)) in ffeequiv_offset_()
906 kt = ffeinfo_kindtype (ffebld_info (expr)); in ffeste_io_dofio_()994 kt = ffeinfo_kindtype (ffebld_info (expr)); in ffeste_io_dolio_()1084 kt = ffeinfo_kindtype (ffebld_info (expr)); in ffeste_io_douio_()3139 assert (ffeinfo_kindtype (ffebld_info (expr)) in ffeste_R842()3158 assert (ffeinfo_kindtype (ffebld_info (expr)) in ffeste_R842()3204 assert (ffeinfo_kindtype (ffebld_info (expr)) in ffeste_R843()3222 assert (ffeinfo_kindtype (ffebld_info (expr)) in ffeste_R843()
1382 [ffeinfo_kindtype (ffebld_info (exprh))]) in ffecom_arglist_expr_()1469 ffeinfo_kindtype (ffebld_info (item))); in ffecom_widest_expr_type_()1481 [ffeinfo_kindtype (ffebld_info (widest))]; in ffecom_widest_expr_type_()2959 kt = ffeinfo_kindtype (ffebld_info (expr)); in ffecom_expr_()3265 if ((ffeinfo_kindtype (ffebld_info (left)) in ffecom_expr_()3282 if (ffeinfo_kindtype (ffebld_info (left)) in ffecom_expr_()3296 if (ffeinfo_kindtype (ffebld_info (left)) in ffecom_expr_()3829 kt = ffeinfo_kindtype (ffebld_info (expr)); in ffecom_expr_intrinsic_()3863 [ffeinfo_kindtype (ffebld_info (arg1))]; in ffecom_expr_intrinsic_()7336 kt = ffeinfo_kindtype (ffebld_info (s)); in ffecom_sym_transform_()[all …]
210 #define ffesymbol_kindtype(s) ffeinfo_kindtype((s)->info)
429 assert (ffeinfo_kindtype (ffebld_info (kind)) in ffestc_establish_declinfo_()470 assert (ffeinfo_kindtype (ffebld_info (len)) in ffestc_establish_declinfo_()584 assert (ffeinfo_kindtype (ffebld_info (kind)) in ffestc_establish_declstmt_()627 assert (ffeinfo_kindtype (ffebld_info (len)) in ffestc_establish_declstmt_()9084 s->kindtype = ffeinfo_kindtype (ffebld_info (expr)); in ffestc_R809()9201 || ((ffeinfo_kindtype (ffebld_info (caseobj->expr1)) in ffestc_R810()9203 && (ffeinfo_kindtype (ffebld_info (caseobj->expr1)) != FFEINFO_kindtypeINTEGER1 )) in ffestc_R810()9208 || ((ffeinfo_kindtype (ffebld_info (caseobj->expr2)) in ffestc_R810()9210 && (ffeinfo_kindtype (ffebld_info (caseobj->expr2)) != FFEINFO_kindtypeINTEGER1))))))) in ffestc_R810()
141 kt = ffeinfo_kindtype (ffebld_info (item)); in ffestu_sym_end_transition()
3998 || (ffeinfo_kindtype (ffebld_info (expr)) == FFEINFO_kindtypeINTEGER4)) in ffestd_R1001rtexpr_()4008 switch (ffeinfo_kindtype (ffebld_info (expr))) in ffestd_R1001rtexpr_()4769 assert (ffeinfo_kindtype (ffebld_info (filename)) in ffestd_S3P4()
938 #define ffebld_kindtype(b) (ffeinfo_kindtype (ffebld_info ((b))))