From: ian <ian>
Date: Tue, 22 Nov 2005 23:03:53 +0000 (+0000)
Subject: replace many call with rcall; goto with bra
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;h=3b752d3a292dddaacdc829752596fb5c7ba64f04;p=trains.git

replace many call with rcall; goto with bra
---

diff --git a/detpic/panic.asm b/detpic/panic.asm
index 3678ac1..6e9c62b 100644
--- a/detpic/panic.asm
+++ b/detpic/panic.asm
@@ -77,15 +77,15 @@ panic_loop
 	swap_f	panic_regs	; panic_regs now contains # registers to read
 
 	call	led_black
-	call	waiting16
-	call	morsemsg	; transmit morse in red
+	rcall	waiting16
+	rcall	morsemsg	; transmit morse in red
 	call	led_black
-	call	waiting8
-	call	waiting4
-	call	registermsg	; transmit contents of registers in 
+	rcall	waiting8
+	rcall	waiting4
+	rcall	registermsg	; transmit contents of registers in 
 				; red(=low) and blue(=high)
-	call	waiting16
-        goto    panic_loop
+	rcall	waiting16
+        bra	panic_loop
 
 ;****************************************************************************
 ; PANIC SUBROUTINES
@@ -103,9 +103,9 @@ morse_loop
 
 	tblrd		*+
 	mov_ff		TABLAT,flash_pattern
-	call		morse_readout
+	rcall		morse_readout
 	inc_f		morse_counter
-	goto		morse_loop
+	bra		morse_loop
 
 
 ;--------------------------
@@ -142,7 +142,7 @@ morse_readout_if_led_1
 	call		led_red
 
 morse_readout_endif_led
-	call		waiting
+	rcall		waiting
 	bra		morse_readout_loop
 
 ;--------------------------
@@ -171,12 +171,12 @@ register_loop
 	clr_f		FSR0H		; for insns using Access Bank)
 
 	mov_ff		INDF0,flash_pattern
-	call		register_readout
+	rcall		register_readout
 
 	inc_f		register_counter	;increment loop counter
 
-	call		waiting8
-	goto		register_loop
+	rcall		waiting8
+	bra		register_loop
 
 ;--------------------------
 
@@ -206,8 +206,8 @@ register_readout_loop
         mov_lw   	4
         cmp_fw_ifne	bit_counter	; if loop counter !=4 (nybble length), 
 					; skip insertion of extra black space
-	goto		not_nybble_boundary
-	call		waiting4
+	bra		not_nybble_boundary
+	rcall		waiting4
 
 not_nybble_boundary
         rl_f	   	flash_pattern           ; top bit goes into N flag, 
@@ -223,9 +223,9 @@ register_readout_if_led_1
 
 register_readout_endif_led
         inc_f    	bit_counter       ; increment loop counter
-        call    	waiting
+        rcall    	waiting
         call    	led_black
-        call    	waiting
+        rcall    	waiting
         bra     	register_readout_loop