cc65/libsrc/rp6502/write_xstack.c

#include <rp6502.h>

int __fastcall__ write_xstack (const void* buf, unsigned count, int fildes)
{
    unsigned i;
    for (i = count; i;) {
        ria_push_char (((char*)buf)[--i]);
    }
    ria_set_ax (fildes);
    return ria_call_int_errno (RIA_OP_WRITE_XSTACK);
}