diff --git a/xa/src/xalisting.c b/xa/src/xalisting.c
index c60303c..11955b4 100644
--- a/xa/src/xalisting.c
+++ b/xa/src/xalisting.c
@@ -449,6 +449,7 @@ int list_tokens(char *buf, signed char *input, int len) {
 		switch(input[inp]) {
 		case T_CAST:
 			outp += list_string(buf+outp, formatp->escape_char(input[inp+1]));
+			inp++;
 			break;
 		case T_VALUE:
 			/*outp += list_char(buf+outp, 'V');*/