6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-06-26 20:29:34 +00:00
Code Issues Projects Releases Wiki Activity

New module tgi_geterrormsg.s

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@3122 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz 2004-06-15 09:02:05 +00:00
parent ff3f7da425
commit 1297374ea7
2 changed files with 53 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
libsrc/tgi/Makefile
View File

@ -29,6 +29,7 @@ S_OBJS = tgi-kernel.o \
tgi_getcolorcount.o \
tgi_getdefpalette.o \
tgi_geterror.o \
tgi_geterrormsg.o \
tgi_getmaxcolor.o \
tgi_getmaxx.o \
tgi_getmaxy.o \

52
libsrc/tgi/tgi_geterrormsg.s Normal file
View File

@ -0,0 +1,52 @@
;
; Ullrich von Bassewitz, 2004-06-15
;
; const char* __fastcall__ tgi_geterrormsg (unsigned char code);
; /* Get an error message describing the error in code. */
;
.include "tgi-kernel.inc"
.include "tgi-error.inc"
.proc _tgi_geterrormsg
cmp #TGI_ERR_COUNT
bcs L1
lda #TGI_ERR_COUNT ; "Unknown error"
L1: tay
ldx #>msgtab
lda #<msgtab
clc
adc offs,y
bcc L2
inx
L2: rts
.endproc
;----------------------------------------------------------------------------
; Error messages. The messages are currently limited to 256 bytes total.
.rodata
offs: .byte <(msg0-msgtab)
.byte <(msg1-msgtab)
.byte <(msg2-msgtab)
.byte <(msg3-msgtab)
.byte <(msg4-msgtab)
.byte <(msg5-msgtab)
.byte <(msg6-msgtab)
.byte <(msg7-msgtab)
msgtab:
msg0: .asciiz "No error"
msg1: .asciiz "No driver available"
msg2: .asciiz "Error loading driver"
msg3: .asciiz "Invalid driver"
msg4: .asciiz "Mode not supported by driver"
msg5: .asciiz "Invalid function argument"
msg6: .asciiz "Function not supported"
msg7: .asciiz "Unknown error"