In system 27.1, with microcode 635, on LISP Machine One:
The following works compiled but causes the compiler to error out with an
"unseen prog label" error.
...
(LET ((SI:KBD-TYI-HOOK
#'(LAMBDA (C) .... (RETURN-FROM INSTALL-LAYOUT NIL) ....))))
(DO-NAMED INSTALL-LAYOUT
() (())
...)