.seg
sp := r15
SP := rr14
.psec
.code
_wait::
{
sc #7 /*wait*/
ldl rr2,rr4
jp c,cerror
ldl rr6,SP(#4)
testl rr6
ret z
ld @rr6,r3
ret
}