listbas: print empty op token names correctly, handle silent let in A+.

1 files changed, 6 insertions, 1 deletions

diff --git a/listbas.c b/listbas.c
index 448ee8d..fe2cbd4 100644
--- a/listbas.c
+++ b/listbas.c
@@ -415,6 +415,7 @@ void print_ata_chr(unsigned char c) {
 void print_mixed_case(const char *name) {
 	char c;
 
+	if(!*name) return;
 	if(*name == ' ')
 		outchr(*name++);
 	outchr(*name++);
@@ -469,7 +470,11 @@ CALLBACK(print_lineno) {
 CALLBACK(print_cmd) {
 	const char *name;
 
-	if(tok == CMD_ILET) return;
+	if(bas_type == B_APLUS) {
+		if(tok == 0x52) return;
+	} else {
+		if(tok == CMD_ILET) return;
+	}
 
 	if(color) color_on(color_cmd);