(PRINT x) returns T

[Howard I. Cannon <HIC at MIT-MC>]

    Date: 23 APR 1979 2208-EST
    From: JONL at MIT-MC (Jon L White)

    What was the idea you had in mind when you said "frivolous"?
    Won't the lispm incompatibility make code difficult to translate,
    e.g.  (AND (TEST X) (PRINC '|Here, X = |) (PRINT X) (PRINC '|(lbs)|))
    since the last PRINC wouldn't be done when X is null.
------
Yes, this is an incompatibility, but we believe that code like this is
cretinous anyway (yesh, this is glossing over the issue).  The utility
of having PRINT return its arg is greater than the utility of supporting
such losing code.