diff --git a/alpha/alpha_cpu.c b/alpha/alpha_cpu.c
index 6b9ad479..6f10f635 100644
--- a/alpha/alpha_cpu.c
+++ b/alpha/alpha_cpu.c
@@ -1730,7 +1730,7 @@ return SCPE_OK;
 t_stat cpu_show_virt (FILE *of, UNIT *uptr, int32 val, CONST void *desc)
 {
 t_stat r;
-const char *cptr = (const char *) desc;
+CONST char *cptr = (CONST char *) desc;
 t_uint64 va, pa;
 
 if (cptr) {
@@ -1840,7 +1840,7 @@ return SCPE_OK;
 t_stat cpu_show_hist (FILE *st, UNIT *uptr, int32 val, CONST void *desc)
 {
 int32 k, di, lnt;
-const char *cptr = (const char *) desc;
+CONST char *cptr = (CONST char *) desc;
 t_stat r;
 InstHistory *h;
 
diff --git a/alpha/alpha_sys.c b/alpha/alpha_sys.c
index 6e3dc5ba..622bd532 100644
--- a/alpha/alpha_sys.c
+++ b/alpha/alpha_sys.c
@@ -35,7 +35,7 @@ extern uint32 pal_type;
 
 t_stat fprint_sym_m (FILE *of, t_addr addr, uint32 inst);
 t_stat parse_sym_m (CONST char *cptr, t_addr addr, t_value *inst);
-int32 parse_reg (const char *cptr);
+int32 parse_reg (CONST char *cptr);
 
 extern t_stat fprint_pal_hwre (FILE *of, uint32 inst);
 extern t_stat parse_pal_hwre (CONST char *cptr, t_value *inst);
@@ -802,7 +802,7 @@ return -3;
 
 /* Parse a register */
 
-int32 parse_reg (const char *cptr)
+int32 parse_reg (CONST char *cptr)
 {
 t_stat r;
 int32 reg;