Searched refs:GET_DIST_MASK_LOG8 (Results 1 – 8 of 8) sorted by relevance
214 if ((*s1_elem_p & GET_DIST_MASK_LOG8) && in ENTF90()215 (*s2_elem_p & GET_DIST_MASK_LOG8)) { in ENTF90()237 if ((*s1_elem_p & GET_DIST_MASK_LOG8) && in ENTF90()238 (*s2_elem_p & GET_DIST_MASK_LOG8)) { in ENTF90()
54 return (*(__LOG8_T *)b & GET_DIST_MASK_LOG8) != 0; in I8()152 return (*(__LOG8_T *)b & GET_DIST_MASK_LOG8) != 0; in I8()
111 mval = (*(__LOG8_T *)tmp & GET_DIST_MASK_LOG8) != 0; in ENTFTN()254 mval = (*(__LOG8_T *)tmp & GET_DIST_MASK_LOG8) != 0; in ENTFTN()379 mval = (*(__LOG8_T *)tmp & GET_DIST_MASK_LOG8) != 0; in ENTFTN()
108 *(__LOG8_T *)adr & GET_DIST_MASK_LOG8 ? ".TRUE." : ".FALSE."); in __fort_print_scalar()578 fprintf(__io_stderr(), l8[i * str] & GET_DIST_MASK_LOG8 ? " T" : " F"); in I8()
3656 return *(__INT8_T *)a & GET_DIST_MASK_LOG8 ? GET_DIST_TRUE_LOG1 : 0;3658 return *(__LOG8_T *)a & GET_DIST_MASK_LOG8 ? GET_DIST_TRUE_LOG1 : 0;3682 return *(__INT8_T *)a & GET_DIST_MASK_LOG8 ? GET_DIST_TRUE_LOG2 : 0;3684 return *(__LOG8_T *)a & GET_DIST_MASK_LOG8 ? GET_DIST_TRUE_LOG2 : 0;3708 return *(__INT8_T *)a & GET_DIST_MASK_LOG8 ? GET_DIST_TRUE_LOG4 : 0;3710 return *(__LOG8_T *)a & GET_DIST_MASK_LOG8 ? GET_DIST_TRUE_LOG4 : 0;3734 return *(__INT8_T *)a & GET_DIST_MASK_LOG8 ? GET_DIST_TRUE_LOG8 : 0;3736 return *(__LOG8_T *)a & GET_DIST_MASK_LOG8 ? GET_DIST_TRUE_LOG8 : 0;
277 #define GET_DIST_MASK_LOG8 __get_fort_mask_log8() macro413 #define GET_DIST_MASK_LOG8 __fort_mask_log8 macro
213 mask_log8 = GET_DIST_MASK_LOG8; in dotp_log8()
56 return (*(__LOG8_T *)b & GET_DIST_MASK_LOG8) != 0; in I8()