Files
open-roms/c64/kernal/iostack/chkinout.s
T

22 lines
330 B
ArmAsm

// #LAYOUT# STD * #TAKE
// #LAYOUT# * KERNAL_0 #TAKE
// #LAYOUT# * * #IGNORE
//
// Common part of CHKIN and CKOUT
//
chkinout_device_not_present:
ply_trash_a
pla
jsr kernalstatus_DEVICE_NOT_FOUND
jmp kernalerror_DEVICE_NOT_FOUND
chkinout_file_not_open:
ply_trash_a
pla
jmp kernalerror_FILE_NOT_OPEN