Incorrect call to node-kind with (defpackage .. (:shadow ...))

[robert-strandh]

When the LIST builder is used to parse and unparse (defpackage ... (:shadow x)), there is an error signaled,
and the message is that there is no applicable method for NODE-KIND when given arguments the symbols
LIST and X.