From 9b24bbc85c43cd3f4aa14a3e95f9e5c30e48f80d Mon Sep 17 00:00:00 2001
From: cuz <cuz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Wed, 12 Nov 2003 16:40:54 +0000
Subject: [PATCH] Removed the HORLINE entry point

git-svn-id: svn://svn.cc65.org/cc65/trunk@2652 b7a2c559-68d2-44c3-8de9-860c34a00d81
---
 libsrc/geos/devel/geos-tgi.s | 33 +--------------------------------
 1 file changed, 1 insertion(+), 32 deletions(-)

diff --git a/libsrc/geos/devel/geos-tgi.s b/libsrc/geos/devel/geos-tgi.s
index 65aec454a..a16307bf9 100644
--- a/libsrc/geos/devel/geos-tgi.s
+++ b/libsrc/geos/devel/geos-tgi.s
@@ -69,7 +69,6 @@ pages:	.byte   1                       ; Number of screens available
         .word   GETDEFPALETTE
         .word   SETPIXEL
         .word   GETPIXEL
-        .word   HORLINE
         .word   LINE
         .word   BAR
         .word   CIRCLE
@@ -566,36 +565,6 @@ GETPIXEL:
 	ldx	#0
 	rts
 
-; ------------------------------------------------------------------------
-; HORLINE: Draw a horizontal line from X1/Y to X2/Y, where X1 = ptr1,
-; Y = ptr2 and X2 = ptr3, using the current drawing color.
-;
-; This is a special line drawing entry used when the line is know to be
-; horizontal, for example by the BAR emulation routine. If the driver does
-; not have special code for horizontal lines, it may just copy Y to Y2 and
-; proceed with the generic line drawing code.
-;
-; Note: Line coordinates will always be sorted (Y1 <= X2) and clipped.
-;
-; Must set an error code: NO
-;
-
-HORLINE:
-	lda	X1
-	ldx	X1+1
-	ldy	Y1
-	sta	r3L
-	stx	r3H
-	sty	r11L
-	lda	X2
-	ldx	X2+1
-	sta	r4L
-	stx	r4H
-	lda	BITMASK
-	beq	@L1
-	lda	#%11111111		; pattern
-@L1:	jmp	HorizontalLine
-
 ; ------------------------------------------------------------------------
 ; LINE: Draw a line from X1/Y1 to X2/Y2, where X1/Y1 = ptr1/ptr2 and
 ; X2/Y2 = ptr3/ptr4 using the current drawing color.
@@ -670,7 +639,7 @@ CIRCLE:
 	; x = r;
 	lda	#0
 	sta	XX+1
-	sta	YY
+  	sta	YY
 	sta	YY+1
 	sta	MaxO
 	sta	MaxO+1
-- 
2.39.5