From: Christian Groessler <chris@groessler.org>
Date: Thu, 30 May 2013 23:38:16 +0000 (+0200)
Subject: adapt to atarixl target
X-Git-Tag: V2.15~223^2~115
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=7aa22317027df79a5a492b2e676421e0df09ba16;p=cc65

adapt to atarixl target
---

diff --git a/libsrc/atari/cgetc.s b/libsrc/atari/cgetc.s
index f8948a5bc..43969c2aa 100644
--- a/libsrc/atari/cgetc.s
+++ b/libsrc/atari/cgetc.s
@@ -7,22 +7,28 @@
 
         .include "atari.inc"
         .export _cgetc,setcursor
+         .import KEYBDV_wrapper
         .import cursor,mul40
 
 _cgetc:
         jsr     setcursor
+        lda     #12
+        sta     ICAX1Z          ; fix problems with direct call to KEYBDV
+.if .not .defined(__ATARIXL__)
         jsr     @1
+.else
+	jsr	KEYBDV_wrapper
+.endif
         ldx     #0
         rts
 
-@1:     lda     KEYBDV+5
+.if .not .defined(__ATARIXL__)
+@1:	lda     KEYBDV+5
         pha
         lda     KEYBDV+4
         pha
-        lda     #12
-        sta     ICAX1Z          ; fix problems with direct call to KEYBDV
-        rts
-
+	rts
+.endif
 
 .proc   setcursor