3103 test_eval(Test_env *te, Test_op op, const char *opnd1, const char *opnd2,  in test_eval()  argument
3150 		return (*opnd1 != '\0');  in test_eval()
3154 		return (*opnd1 == '\0');  in test_eval()
3158 		if ((i = *opnd1) == '!' || i == '?')  in test_eval()
3159 			opnd1++;  in test_eval()
3160 		if ((k = option(opnd1)) == (size_t)-1)  in test_eval()
3167 		return (access(opnd1, R_OK) == 0);  in test_eval()
3172 		return (access(opnd1, W_OK) == 0);  in test_eval()
3176 		return (ksh_access(opnd1, X_OK) == 0);  in test_eval()
3182 		return (stat(opnd1, &b1) == 0);  in test_eval()
3186 		return (stat(opnd1, &b1) == 0 && S_ISREG(b1.st_mode));  in test_eval()
3190 		return (stat(opnd1, &b1) == 0 && S_ISDIR(b1.st_mode));  in test_eval()
3194 		return (stat(opnd1, &b1) == 0 && S_ISCHR(b1.st_mode));  in test_eval()
3198 		return (stat(opnd1, &b1) == 0 && S_ISBLK(b1.st_mode));  in test_eval()
3202 		return (stat(opnd1, &b1) == 0 && S_ISFIFO(b1.st_mode));  in test_eval()
3209 		return (lstat(opnd1, &b1) == 0 && S_ISLNK(b1.st_mode));  in test_eval()
3214 		return (stat(opnd1, &b1) == 0 && S_ISSOCK(b1.st_mode));  in test_eval()
3232 		nv = shf_smprintf("%s+", opnd1);  in test_eval()
3243 		return (stat(opnd1, &b1) == 0 &&  in test_eval()
3248 		return (stat(opnd1, &b1) == 0 &&  in test_eval()
3254 		return (stat(opnd1, &b1) == 0 &&  in test_eval()
3262 		return (stat(opnd1, &b1) == 0 && (off_t)b1.st_size > (off_t)0);  in test_eval()
3266 		if (opnd1 && !bi_getn(opnd1, &i)) {  in test_eval()
3270 			i = isatty(opnd1 ? i : 0);  in test_eval()
3275 		return (stat(opnd1, &b1) == 0 && (uid_t)b1.st_uid == ksheuid);  in test_eval()
3279 		return (stat(opnd1, &b1) == 0 && (gid_t)b1.st_gid == getegid());  in test_eval()
3288 			if ((i = gmatchx(opnd1, opnd2, false)))  in test_eval()
3289 				record_match(opnd1);  in test_eval()
3292 		return (strcmp(opnd1, opnd2) == 0);  in test_eval()
3297 			if ((i = gmatchx(opnd1, opnd2, false)))  in test_eval()
3298 				record_match(opnd1);  in test_eval()
3301 		return (strcmp(opnd1, opnd2) != 0);  in test_eval()
3305 		return (strcmp(opnd1, opnd2) < 0);  in test_eval()
3309 		return (strcmp(opnd1, opnd2) > 0);  in test_eval()
3323 		if (!evaluate(opnd1, &v1, KSH_RETURN_ERROR, false) ||  in test_eval()
3354 		return (stat(opnd1, &b1) == 0 &&  in test_eval()
3365 		    (((s = stat(opnd1, &b1)) == 0 &&  in test_eval()
3370 		return (stat (opnd1, &b1) == 0 && stat (opnd2, &b2) == 0 &&  in test_eval()
3431 	const char *opnd1, *opnd2;  in test_primary()  local
3455 			opnd1 = (*te->getopnd)(te, op, do_eval);  in test_primary()
3456 			if (!opnd1) {  in test_primary()
3461 			return ((*te->eval)(te, op, opnd1, NULL, do_eval));  in test_primary()
3464 	opnd1 = (*te->getopnd)(te, TO_NONOP, do_eval);  in test_primary()
3465 	if (!opnd1) {  in test_primary()
3477 		return ((*te->eval)(te, op, opnd1, opnd2, do_eval));  in test_primary()
3479 	return ((*te->eval)(te, TO_STNZE, opnd1, NULL, do_eval));  in test_primary()