1987-01-07 17:13:41 +00:00
|
|
|
#include "sys.h"
|
1987-05-14 17:45:41 +00:00
|
|
|
.define _fperr
|
|
|
|
|
.extern _errno
|
1987-01-07 17:13:41 +00:00
|
|
|
|
|
|
|
|
_fperr:
|
1987-05-14 17:45:41 +00:00
|
|
|
sys local; .data2 0f
|
|
|
|
|
bcc 1f
|
1987-01-07 17:13:41 +00:00
|
|
|
mov r0,_errno
|
|
|
|
|
mov $-1,r0
|
|
|
|
|
rts pc
|
|
|
|
|
1:
|
|
|
|
|
mov r5,-(sp)
|
|
|
|
|
mov 4(sp),r5
|
|
|
|
|
mov r0,(r5)+
|
|
|
|
|
mov r1,(r5)
|
|
|
|
|
mov (sp)+,r5
|
|
|
|
|
rts pc
|
1987-05-14 17:45:41 +00:00
|
|
|
.sect .data
|
1987-01-07 17:13:41 +00:00
|
|
|
0:
|
|
|
|
|
sys fperr
|
