From: Olli Savia <ops@iki.fi>
Date: Mon, 26 Nov 2018 20:01:04 +0000 (+0200)
Subject: Added SER_ prefix. Whitespace cleanup
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=5901ea80a4556325598241b6fcb540fea896b383;p=cc65

Added SER_ prefix. Whitespace cleanup
---

diff --git a/libsrc/apple2/ser/a2.ssc.s b/libsrc/apple2/ser/a2.ssc.s
index d5c567165..a32110ef2 100644
--- a/libsrc/apple2/ser/a2.ssc.s
+++ b/libsrc/apple2/ser/a2.ssc.s
@@ -44,15 +44,15 @@
         .addr   $0000
 
         ; Jump table
-        .addr   INSTALL
-        .addr   UNINSTALL
-        .addr   OPEN
-        .addr   CLOSE
-        .addr   GET
-        .addr   PUT
-        .addr   STATUS
-        .addr   IOCTL
-        .addr   IRQ
+        .addr   SER_INSTALL
+        .addr   SER_UNINSTALL
+        .addr   SER_OPEN
+        .addr   SER_CLOSE
+        .addr   SER_GET
+        .addr   SER_PUT
+        .addr   SER_STATUS
+        .addr   SER_IOCTL
+        .addr   SER_IRQ
 
 ;----------------------------------------------------------------------------
 ; I/O definitions
@@ -141,23 +141,23 @@ IdTableLen      = * - IdValTable
         .code
 
 ;----------------------------------------------------------------------------
-; INSTALL: Is called after the driver is loaded into memory. If possible,
+; SER_INSTALL: Is called after the driver is loaded into memory. If possible,
 ; check if the hardware is present. Must return an SER_ERR_xx code in a/x.
 ;
 ; Since we don't have to manage the IRQ vector on the Apple II, this is
 ; actually the same as:
 ;
-; UNINSTALL: Is called before the driver is removed from memory.
+; SER_UNINSTALL: Is called before the driver is removed from memory.
 ; No return code required (the driver is removed from memory on return).
 ;
 ; and:
 ;
-; CLOSE: Close the port and disable interrupts. Called without parameters.
+; SER_CLOSE: Close the port and disable interrupts. Called without parameters.
 ; Must return an SER_ERR_xx code in a/x.
 
-INSTALL:
-UNINSTALL:
-CLOSE:
+SER_INSTALL:
+SER_UNINSTALL:
+SER_CLOSE:
         ldx     Index           ; Check for open port
         beq     :+
 
@@ -172,16 +172,16 @@ CLOSE:
         rts
 
 ;----------------------------------------------------------------------------
-; OPEN: A pointer to a ser_params structure is passed in ptr1.
+; SER_OPEN: A pointer to a ser_params structure is passed in ptr1.
 ; Must return an SER_ERR_xx code in a/x.
 
-OPEN:   
+SER_OPEN:
         ldx     #<$C000
         stx     ptr2
         lda     #>$C000
         ora     Slot
         sta     ptr2+1
-        
+
         ; Check Pascal 1.1 Firmware Protocol ID bytes
 :       ldy     IdOfsTable,x
         lda     IdValTable,x
@@ -190,7 +190,7 @@ OPEN:
         inx
         cpx     #IdTableLen
         bcc     :-
-        
+
         ; Convert slot to I/O register index
         lda     Slot
         asl
@@ -273,11 +273,11 @@ InvBaud:lda     #<SER_ERR_BAUD_UNAVAIL
         rts
 
 ;----------------------------------------------------------------------------
-; GET: Will fetch a character from the receive buffer and store it into the
+; SER_GET: Will fetch a character from the receive buffer and store it into the
 ; variable pointed to by ptr1. If no data is available, SER_ERR_NO_DATA is
 ; returned.
 
-GET:
+SER_GET:
         ldx     Index
         ldy     SendFreeCnt     ; Send data if necessary
         iny                     ; Y == $FF?
@@ -315,10 +315,10 @@ GET:
         rts
 
 ;----------------------------------------------------------------------------
-; PUT: Output character in A.
+; SER_PUT: Output character in A.
 ; Must return an SER_ERR_xx code in a/x.
 
-PUT:
+SER_PUT:
         ldx     Index
 
         ; Try to send
@@ -348,10 +348,10 @@ PUT:
         rts
 
 ;----------------------------------------------------------------------------
-; STATUS: Return the status in the variable pointed to by ptr1.
+; SER_STATUS: Return the status in the variable pointed to by ptr1.
 ; Must return an SER_ERR_xx code in a/x.
 
-STATUS:
+SER_STATUS:
         ldx     Index
         lda     ACIA_STATUS,x
         ldx     #$00
@@ -360,11 +360,11 @@ STATUS:
         rts
 
 ;----------------------------------------------------------------------------
-; IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl
+; SER_IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl
 ; specific data in ptr1, and the ioctl code in A.
 ; Must return an SER_ERR_xx code in a/x.
 
-IOCTL:
+SER_IOCTL:
         ; Check data msb and code to be 0
         ora     ptr1+1
         bne     :+
@@ -384,12 +384,12 @@ IOCTL:
         rts
 
 ;----------------------------------------------------------------------------
-; IRQ: Called from the builtin runtime IRQ handler as a subroutine. All
+; SER_IRQ: Called from the builtin runtime IRQ handler as a subroutine. All
 ; registers are already saved, no parameters are passed, but the carry flag
 ; is clear on entry. The routine must return with carry set if the interrupt
 ; was handled, otherwise with carry clear.
 
-IRQ:
+SER_IRQ:
         ldx     Index           ; Check for open port
         beq     Done
         lda     ACIA_STATUS,x   ; Check ACIA status for receive interrupt
@@ -431,7 +431,7 @@ Again:  lda     SendFreeCnt
         lda     ACIA_STATUS,x
         and     #$10
         bne     Send
-        bit     tmp1            ; Keep trying if must try hard  
+        bit     tmp1            ; Keep trying if must try hard
         bmi     Again
 Quit:   rts