Lines Matching refs:ret
195 #define TFUNC(arg,ret,name,tolerance) { t_func, arg, ret, (void*)&name, m_none, tolerance, #name } argument
196 #define TFUNCARM(arg,ret,name,tolerance) { t_func, arg, ret, (void*)& ARM_PREFIX(name), m_none, tol… argument
197 #define MFUNC(arg,ret,name,tolerance) { t_macro, arg, ret, NULL, m_##name, tolerance, #name } argument
716 testdetail ret; /* What we return */ in parsetest() local
722 memset(&ret, 0, sizeof(ret)); in parsetest()
728 ret.comment = 1; in parsetest()
730 return ret; in parsetest()
732 ret.comment = 0; in parsetest()
736 ret = oldtest; /* structure copy */ in parsetest()
743 ret.random = randomstate; in parsetest()
745 ret.in_err = 0; in parsetest()
746 ret.in_err_limit = e_number_of_errnos; in parsetest()
758 ret.comment = 1; in parsetest()
759 return ret; /* otherwise ignore this line */ in parsetest()
763 ret.func = find_testfunc(q); in parsetest()
764 if (ret.func == NULL) in parsetest()
769 if(is_single_argtype(ret.func->argtype)) in parsetest()
771 else if(is_double_argtype(ret.func->argtype)) in parsetest()
773 if(is_single_rettype(ret.func->rettype)) in parsetest()
775 else if(is_double_rettype(ret.func->rettype)) in parsetest()
778 if (verbose) printf("(name=%s) (size=%d)\n", ret.func->name, ret.func->argtype); in parsetest()
782 n = do_op(q,ret.op1r,"op1r",2,argtype); in parsetest()
787 n = do_op(q,ret.op1i,"op1i",2,argtype); in parsetest()
793 n = do_op(q,ret.op2r,"op2r",2,argtype); in parsetest()
798 n = do_op(q,ret.op2i,"op2i",2,argtype); in parsetest()
805 ret.resultc = rc_infinity; in parsetest()
807 ret.resultc = rc_zero; in parsetest()
809 ret.resultc = rc_nan; in parsetest()
811 ret.resultc = rc_finite; in parsetest()
818 n = (do_op)(q,ret.resultr,"resultr",3,rettype); in parsetest()
821 ret.nresult = n; /* assume real and imaginary have same no. words */ in parsetest()
824 n = do_op(q,ret.resulti,"resulti",3,rettype); in parsetest()
829 n = do_op(q,ret.res2,"res2",2,rettype); in parsetest()
835 if (*q == 'i') ret.status |= FE_INVALID; in parsetest()
836 if (*q == 'z') ret.status |= FE_DIVBYZERO; in parsetest()
837 if (*q == 'o') ret.status |= FE_OVERFLOW; in parsetest()
838 if (*q == 'u') ret.status |= FE_UNDERFLOW; in parsetest()
848 case e_domain: ret.maybestatus |= FE_INVALID; break; in parsetest()
849 case e_divbyzero: ret.maybestatus |= FE_DIVBYZERO; break; in parsetest()
850 case e_overflow: ret.maybestatus |= FE_OVERFLOW; break; in parsetest()
851 case e_underflow: ret.maybestatus |= FE_UNDERFLOW; break; in parsetest()
857 ret.maybeerr = e_EDOM; break; in parsetest()
861 ret.maybeerr = e_ERANGE; break; in parsetest()
866 if (*q == 'i') ret.maybestatus |= FE_INVALID; in parsetest()
867 if (*q == 'z') ret.maybestatus |= FE_DIVBYZERO; in parsetest()
868 if (*q == 'o') ret.maybestatus |= FE_OVERFLOW; in parsetest()
869 if (*q == 'u') ret.maybestatus |= FE_UNDERFLOW; in parsetest()
879 case e_domain: ret.status |= FE_INVALID; break; in parsetest()
880 case e_divbyzero: ret.status |= FE_DIVBYZERO; break; in parsetest()
881 case e_overflow: ret.status |= FE_OVERFLOW; break; in parsetest()
882 case e_underflow: ret.status |= FE_UNDERFLOW; break; in parsetest()
888 ret.err = e_EDOM; break; in parsetest()
892 ret.err = e_ERANGE; break; in parsetest()
898 ret.maybeerr = e_EDOM; break; in parsetest()
902 ret.maybeerr = e_ERANGE; break; in parsetest()
907 ret.err = find(q, errnos, sizeof(errnos)); in parsetest()
908 if (ret.err < 0) in parsetest()
912 ret.in_err = find(q, errnos, sizeof(errnos)); in parsetest()
913 if (ret.err < 0) in parsetest()
915 ret.in_err_limit = ret.in_err + 1; in parsetest()
928 ret.valid = 1; in parsetest()
929 return ret; in parsetest()
933 ret.valid = 0; in parsetest()
934 return ret; in parsetest()