various cleanups

c64/basic/ab1e.strout.s

@@ -8,7 +8,7 @@ STROUT:
 	sty FRESPC+1
 	sta FRESPC+0
 	
-	_phx
+	phx_trash_a
 
 	// Get offset ready
 	ldy #$00
@@ -28,6 +28,6 @@ STROUT:
 	iny
 	bne !-
 !:
-	pla // XXX can we use _plx here?
+	pla // XXX can we use plx_trash_a here?
 	tax
 	rts

c64/basic/basic_do_error.s

@@ -2,7 +2,7 @@
 
 basic_do_error:
 	// Save error number
-	_phx
+	phx_trash_a
 
 	// Print ? at start
 	jsr print_return
@@ -10,7 +10,7 @@ basic_do_error:
 	jsr JCHROUT
 
 	// Print main part of error message
-	_plx
+	plx_trash_a
 	jsr print_packed_message
 
 	// Print ERROR at end

c64/basic/cmd_list.s

@@ -100,7 +100,7 @@ list_not_quote:
 	// Save registers
 	tax
 	pha
-	_phy
+	phy_trash_a
 
 	// Get pointer to compressed keyword list
 	lda #<packed_keywords
@@ -118,7 +118,7 @@ list_not_quote:
 	ldy #$ff
 	jsr packed_word_search
 
-	_ply
+	ply_trash_a
 	pla
 
 	cmp #$8f

c64/basic/print_integer.s

@@ -5,7 +5,7 @@
 print_integer:
 
 	pha
-	_phx
+	phx_trash_a
 
 	// Clear temporary output
 	lda #$00

c64/basic/print_packed_message.s

@@ -32,13 +32,13 @@ packed_message_search:
 
 found_message_in_token_stream:
 	// Now print each word in the message
-	_phy
+	phy_trash_a
 	lda packed_message_tokens,y
 	cmp #$ff
 	beq !+
 	jsr print_packed_word
 	jsr print_space
-	_ply
+	ply_trash_a
 	iny
 	bne found_message_in_token_stream
 !:
@@ -137,14 +137,14 @@ next_packed_word_char:
 	tax
 
 	// Save Y so it doesn't get clobbered by CHROUT
-	_phy
+	phy_trash_a
 
 	// X=1-14 = first 14 chars, so subtract one
 	lda packed_message_chars-1,x
 	jsr JCHROUT
 
 	// See if there is a char in the low nybl to print
-	_ply
+	ply_trash_a
 	lda (FRESPC),y
 	and #$0f
 	beq end_of_packed_word
@@ -154,7 +154,7 @@ next_packed_word_char:
 has_lo_nybl_char:
 	// We need to print the low nybl char as well
 	tax
-	_phy
+	phy_trash_a
 
 	// Skip lower nybls of $F or $0 in nybl packed
 	// bytes, as these do not encode characters
@@ -168,7 +168,7 @@ has_nybl:
 	lda packed_message_chars-1,x
 	jsr JCHROUT
 !:
-	_ply
+	ply_trash_a
 	// FALLTHROUGH
 
 no_lo_nybl_char:
@@ -198,7 +198,7 @@ next_is_literal_char:
 unpack_literal_char:
 	// Output the literal char, and ready for next char
 	iny
-	_phy
+	phy_trash_a
 	lda (FRESPC),y
 	jsr JCHROUT
 	pla
@@ -215,6 +215,6 @@ is_uncommon_char:
 
 	// We need to print the low nybl char as well
 	tax
-	_phy
+	phy_trash_a
 
 	jmp has_nybl

c64/basic/wedge_dos.s

@@ -232,7 +232,7 @@ wedge_dos_clean_exit:
 wedge_dos_basic_error:
 	pha
 	jsr JCLALL
-	_plx
+	plx_trash_a
 	dex
 	jmp do_basic_error