compiling DEFCOMs

[Eugene C. Ciccarelli <ECC at MIT-AI>]

In Remote-File 10.0, LMFILE-Remote 17.1, MIT-Specific 9.0, System 86.35,
ZMail 45.1, microcode 123, Saver, on Lisp Machine Nine:

For convenience, in my file that customizes Zwei for me, I have
ECC:DEFCOM deff'd to be ZWEI:DEFCOM.  (So I don't need the
"Zwei:" each time, and so (I think) Zwei will notice the
definitions since the line then starts "(def".)

However, I find that these functions are not getting compiled.
For example, if you have the following small source file:

    ;;; -*- Mode:LISP; Package:USER; Base:10. -*- 
    
    (deff defcom 'zwei:defcom)
    
    (defcom COM-DCTEST "..." ()
       (ZWEI:COM-NEXT-SCREEN))
    
    (defun DCTEST-RANDOM-FUNCTION (x)
      (+ x 5))

and you compile that, you will find that COM-DCTEST is not
compiled -- it is a NAMED-LAMBDA.  DCTEST-RANDOM-FUNCTION, as
expected, is compiled.

Has this always been this way, and I just never noticed?  Is it
not a bug?