diff --git a/scp.c b/scp.c index e4897d24..9b26ab66 100644 --- a/scp.c +++ b/scp.c @@ -3285,6 +3285,8 @@ if (*cptr) { UNIT *uptr; t_stat r; + if (0 == strcmp (gbuf, "DEVICE")) + cptr = get_glyph (cptr, gbuf, 0); dptr = find_unit (gbuf, &uptr); if (dptr == NULL) { dptr = find_dev (gbuf);