TEXT _profin(SB), 1, $0
TESTL probeactive(SB), AX
JZ inotready
MOVL 4(SP),AX
PUSHL AX
MOVL 4(SP),AX
PUSHL AX
CALL profin(SB)
POPL AX
POPL AX
inotready:
RET
TEXT _profout(SB), 1, $0
PUSHL AX
TESTL probeactive(SB), AX
JZ notready
MOVL 4(SP),AX
PUSHL AX
CALL profout(SB)
POPL AX
notready:
POPL AX
RET
|