Files
cc65/libsrc/rp6502/f_getlabel.c
rumbledethumps 4b561acea5 all dir commands
2025-10-16 16:20:23 -07:00

22 lines
447 B
C

#include <rp6502.h>
#include <errno.h>
#include <string.h>
int __fastcall__ f_getlabel (const char* path, char* label)
{
int i, ax;
size_t pathlen = strlen (path);
if (pathlen > 255) {
errno = EINVAL;
return -1;
}
while (pathlen) {
ria_push_char (path[--pathlen]);
}
ax = ria_call_int (RIA_OP_GETLABEL);
for (i = 0; i < ax; i++) {
label[i] = ria_pop_char ();
}
return ax;
}