2 ; Ullrich von Bassewitz, 30.05.1998
4 ; int write (int fd, const void* buf, int count);
11 .importzp ptr1, ptr2, ptr3
13 .include "../cbm/cbm.inc"
15 _write: jsr popax ; get count
17 stx ptr2+1 ; save it for later
19 stx ptr3+1 ; save for function result
23 jsr popax ; get fd and discard it
26 ora ptr2+1 ; count zero?
42 ; No error, return count