[no subject]

CC: (BUG LISPM) at MIT-MC
    Date: Fri ,8 Feb 80 03:58:00 EDT
    From: HENRY at MIT-AI (Henry Lieberman)
    To: (BUG LISPM) at MIT-AI

    Using a symbol whose function cell is an array
    as argument to ASET works interpretively, but
    not compiled.

    (DEFUN ARRAY-BUG ()
           (ARRAY AN-ARRAY T 1)
           (ASET 'ARRAY-ELEMENT 'AN-ARRAY 0)
           (PRINT (AREF 'AN-ARRAY 0)))

    The compiled version complains about a wrong
    type arg.
It is a bug that it works interpretively; it is not supposed to.
I will correct this if the AI machine ever comes up again.