\newlinechar`\^^J
\def\spam{\message{SPAM^^J}\spam}%
\spam