Searched refs:ffeinfo_basictype (Results 1 – 13 of 13) sorted by relevance
316 || (ffeinfo_basictype (i) == FFEINFO_basictypeREAL); in ffeintrin_check_()322 || (ffeinfo_basictype (i) == FFEINFO_basictypeINTEGER) in ffeintrin_check_()329 || (ffeinfo_basictype (i) == FFEINFO_basictypeREAL); in ffeintrin_check_()336 || (ffeinfo_basictype (i) == FFEINFO_basictypeREAL); in ffeintrin_check_()342 || (ffeinfo_basictype (i) == FFEINFO_basictypeREAL); in ffeintrin_check_()671 col_bt = ffeinfo_basictype (i); in ffeintrin_check_()678 ffeinfo_basictype (i), in ffeintrin_check_()930 || (ffeinfo_basictype (i) == FFEINFO_basictypeREAL); in ffeintrin_check_()943 || (ffeinfo_basictype (i) == FFEINFO_basictypeREAL); in ffeintrin_check_()950 || (ffeinfo_basictype (i) == FFEINFO_basictypeREAL); in ffeintrin_check_()[all …]
118 if (ffeinfo_basictype (imp->info) == FFEINFO_basictypeNONE) in ffeimplic_establish_initial()134 if ((ffeinfo_basictype (imp->info) != basic_type) in ffeimplic_establish_initial()182 if (ffeinfo_basictype (imp->info) == FFEINFO_basictypeNONE) in ffeimplic_establish_symbol()190 ffeinfo_new (ffeinfo_basictype (imp->info), in ffeimplic_establish_symbol()371 return ffeinfo_basictype (imp->info); in ffeimplic_peek_symbol_type()
421 assert (ffeinfo_basictype (ffebld_info (size)) in ffedata_advance_()480 assert (ffeinfo_basictype (ffebld_info (size)) in ffedata_advance_()548 assert (ffeinfo_basictype (ffebld_info (size)) in ffedata_advance_()589 assert (ffeinfo_basictype (ffebld_info (itervar)) in ffedata_advance_()603 assert (ffeinfo_basictype (ffebld_info (start)) in ffedata_advance_()608 if (ffeinfo_basictype (ffebld_info (end)) != FFEINFO_basictypeINTEGER) in ffedata_advance_()617 assert (ffeinfo_basictype (ffebld_info (end)) in ffedata_advance_()636 assert (ffeinfo_basictype (ffebld_info (incr)) in ffedata_advance_()815 if ((ffeinfo_basictype (ffebld_info (r)) != FFEINFO_basictypeINTEGER) in ffedata_eval_integer1_()904 switch (ffeinfo_basictype (ffebld_info (ffebld_left (expr)))) in ffedata_eval_integer1_()[all …]
7175 ffeinfo_basictype (info), in ffeexpr_convert_expr()10022 rbt = ffeinfo_basictype (rinfo); in ffeexpr_reduced_bool1_()10108 lbt = ffeinfo_basictype (linfo); in ffeexpr_reduced_bool2_()10115 rbt = ffeinfo_basictype (rinfo); in ffeexpr_reduced_bool2_()10270 lbt = ffeinfo_basictype (linfo); in ffeexpr_reduced_concatenate_()10279 rbt = ffeinfo_basictype (rinfo); in ffeexpr_reduced_concatenate_()10446 lbt = ffeinfo_basictype (linfo); in ffeexpr_reduced_eqop2_()10454 rbt = ffeinfo_basictype (rinfo); in ffeexpr_reduced_eqop2_()10621 rbt = ffeinfo_basictype (rinfo); in ffeexpr_reduced_math1_()10706 lbt = ffeinfo_basictype (linfo); in ffeexpr_reduced_math2_()[all …]
148 #define ffeinfo_basictype(i) (i.basictype) macro
705 assert (ffeinfo_basictype (ffebld_info (subscript)) in ffeequiv_offset_()727 assert (ffeinfo_basictype (ffebld_info (low)) in ffeequiv_offset_()739 assert (ffeinfo_basictype (ffebld_info (high)) in ffeequiv_offset_()802 assert (ffeinfo_basictype (ffebld_info (begin)) in ffeequiv_offset_()
905 bt = ffeinfo_basictype (ffebld_info (expr)); in ffeste_io_dofio_()993 bt = ffeinfo_basictype (ffebld_info (expr)); in ffeste_io_dolio_()1083 bt = ffeinfo_basictype (ffebld_info (expr)); in ffeste_io_douio_()2615 || (ffeinfo_basictype (ffebld_info (expr)) in ffeste_R809()2618 else if (ffeinfo_basictype (ffebld_info (expr)) in ffeste_R809()3119 || (ffeinfo_basictype (ffebld_info (expr)) in ffeste_R842()3133 else if (ffeinfo_basictype (ffebld_info (expr)) in ffeste_R842()3155 assert (ffeinfo_basictype (ffebld_info (expr)) in ffeste_R842()3186 || (ffeinfo_basictype (ffebld_info (expr)) in ffeste_R843()3199 else if (ffeinfo_basictype (ffebld_info (expr)) == FFEINFO_basictypeINTEGER) in ffeste_R843()[all …]
1465 && (ffeinfo_basictype (ffebld_info (item)) in ffecom_widest_expr_type_()1811 || (ffeinfo_basictype (ffebld_info (dest)) in ffecom_call_()2958 bt = ffeinfo_basictype (ffebld_info (expr)); in ffecom_expr_()3250 switch (ffeinfo_basictype (ffebld_info (right))) in ffecom_expr_()3317 ffeinfo_basictype (ffebld_info (left)), in ffecom_expr_()3828 bt = ffeinfo_basictype (ffebld_info (expr)); in ffecom_expr_intrinsic_()3862 [ffeinfo_basictype (ffebld_info (arg1))] in ffecom_expr_intrinsic_()3908 if (ffeinfo_basictype (ffebld_info (arg1)) in ffecom_expr_intrinsic_()7335 bt = ffeinfo_basictype (ffebld_info (s)); in ffecom_sym_transform_()12410 bt = ffeinfo_basictype (ffebld_info (expr)); in ffecom_prepare_expr_()[all …]
164 #define ffesymbol_basictype(s) ffeinfo_basictype((s)->info)
427 assert (ffeinfo_basictype (ffebld_info (kind)) in ffestc_establish_declinfo_()468 assert (ffeinfo_basictype (ffebld_info (len)) in ffestc_establish_declinfo_()582 assert (ffeinfo_basictype (ffebld_info (kind)) in ffestc_establish_declstmt_()625 assert (ffeinfo_basictype (ffebld_info (len)) in ffestc_establish_declstmt_()5136 switch (ffeinfo_basictype (ffebld_info (spec->u.expr))) in ffestc_subr_format_()5282 switch (ffeinfo_basictype (ffebld_info (spec->u.expr))) in ffestc_subr_unit_()9083 s->type = ffeinfo_basictype (ffebld_info (expr)); in ffestc_R809()9199 && ((ffeinfo_basictype (ffebld_info (caseobj->expr1)) in ffestc_R810()9206 && ((ffeinfo_basictype (ffebld_info (caseobj->expr2)) in ffestc_R810()9427 if ((ffeinfo_basictype (ffebld_info (var)) == FFEINFO_basictypeREAL) in ffestc_R819A()[all …]
140 bt = ffeinfo_basictype (ffebld_info (item)); in ffestu_sym_end_transition()
738 #define ffebld_basictype(b) (ffeinfo_basictype (ffebld_info ((b))))
3997 || (ffeinfo_basictype (ffebld_info (expr)) != FFEINFO_basictypeINTEGER) in ffestd_R1001rtexpr_()4767 assert (ffeinfo_basictype (ffebld_info (filename)) in ffestd_S3P4()