2 ; Stefan Haubenthal, 2005-12-24
3 ; Christian Groessler, 2013-07-16
5 ; unsigned char __fastcall__ _sysrmdir (const char* name);
7 ; for SpartaDOS and MyDOS
29 beq not_impl ; AtariDOS
31 bcc do_sparta ; OS/A and SpartaDOS
33 jmp __sysremove ; MyDOS and others (TODO: check XDOS)
50 bne iocberr ; no IOCB available
52 stx tmp4 ; remember IOCB
61 sty tmp2 ; set flag for ucase_fn
66 lda #183 ; see oserror.s
70 .endif ; defined UCASE_FILENAME
73 sta ICBAL,y ; store pointer to filename
92 jsr addysp ; free used space on the stack
95 .endif ; defined UCASE_FILENAME
104 .endproc ; __sysrmdir