usr.bin/pascal/pdx/machine/setbp.c
/*
 * Predicate to test if the reason the process stopped was because
 * of a breakpoint.
 */
Predicate to test if the reason the process stopped was because
of a breakpoint.
Predicate to test if the reason the process stopped was because of a breakpoint .
BOOLEAN isbperr()
{
	register PROCESS *p;
	p = process;
	return(p->status==STOPPED && p->signo==BP_ERRNO);
}
BOOLEAN isbperr ( ) { register PROCESS * p ; p = process ; return ( p -> status == STOPPED && p -> signo == BP_ERRNO ) ; }
Predicate to test if the reason the process stopped was because
 of a breakpoint.
Predicate to test if the reason the process stopped was because of a breakpoint .