/*
 * rename — переименовать файл через ESTEX RENAME ($10).
 *   HL = старое имя (ASCIIZ), DE = новое имя; CF=err с кодом в A.
 * Возвращает 0 или -1 + errno.
 */

#include <stdio.h>

int rename(const char *oldpath, const char *newpath) __naked
{
    (void)oldpath; (void)newpath;
    __asm
        ;; __sdcccall(1): oldpath в HL, newpath в DE — как ждёт ESTEX.
        push  ix
        ld    c, #0x10              ; ESTEX RENAME
        rst   #0x10
        pop   ix
        jr    c, _rename_err
        ld    de, #0
        ret
    _rename_err:
        call  __errno_set
        ld    de, #-1
        ret
    __endasm;
}
