From: cuz <cuz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Tue, 24 Dec 2002 14:22:42 +0000 (+0000)
Subject: Shortened the code
X-Git-Tag: V2.12.0~1835
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=fb2deff1d092545db5939c723f005a6a8bb01e87;p=cc65

Shortened the code


git-svn-id: svn://svn.cc65.org/cc65/trunk@1836 b7a2c559-68d2-44c3-8de9-860c34a00d81
---

diff --git a/libsrc/tgi/tgi-kernel.s b/libsrc/tgi/tgi-kernel.s
index 1aea1f82c..efef42095 100644
--- a/libsrc/tgi/tgi-kernel.s
+++ b/libsrc/tgi/tgi-kernel.s
@@ -99,15 +99,9 @@ _tgi_setup:
         lda     #>tgi_emu_bar
         sta     tgi_bar+2
 
-@L2:    lda	ptr1
-	pha
-	lda	ptr1+1
-	pha
-	jsr     tgi_install             ; Call driver install routine
-        pla                             ; (may update variables)
-	sta	ptr1+1			; (may modify ptr1 so it is preserved)
-	pla
-	sta	ptr1
+@L2:    jsr     tgi_install             ; Call driver install routine, may...
+                                        ; ...update variables
+        jsr     tgi_set_ptr             ; Set ptr1 to tgi_drv
 
 ; Copy variables. Beware: We are using internal knowledge about variable
 ; layout here!