From: uz <uz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Sun, 1 Jan 2012 20:03:33 +0000 (+0000)
Subject: Code optimization contributed by Kajtar Zsolt, soci@c64.rulez.org
X-Git-Tag: V2.13.3~109
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=4127923ad145c7ef6589117c95b9551dfe9f81c4;p=cc65

Code optimization contributed by Kajtar Zsolt, soci@c64.rulez.org


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

diff --git a/libsrc/cbm/filename.s b/libsrc/cbm/filename.s
index b458b8efb..284ea736d 100644
--- a/libsrc/cbm/filename.s
+++ b/libsrc/cbm/filename.s
@@ -144,13 +144,13 @@ drivedone:
 
 fncomplete:
 	pha	   		; Save mode
-        jsr     fnaddcomma      ; Add a comma
         lda     __filetype
-        jsr     fnadd           ; Add the type
+        jsr     fnaddmode       ; Add the type
         pla
 fnaddmode:
         pha
-        jsr     fnaddcomma
+        lda     #','
+        jsr     fnadd
         pla
 
 fnadd:  ldx     fnlen
@@ -158,10 +158,6 @@ fnadd:  ldx     fnlen
         sta     fnbuf,x
         rts
 
-fnaddcomma:
-        lda     #','
-        bne     fnadd
-
 ;--------------------------------------------------------------------------
 ; Data