.define call
.define callc
.define calle
.define cerror
.extern call
.extern callc
.extern calle
.extern cerror
.extern _errno
.text
call: trap #0
bcs cerror
rts
callc:
trap #0
clr.l d0
calle:
cerror:
move.l d0,_errno
move.l #-1,d0