bug#27117: 26.0.50; Setting cl-print-compiled to `static' has problems if print-circle isn't set

[Stefan Monnier]

> Replacing 'cl-prin1' with 'prin1' gives:

>     #[0 "\302\303\301\242\"\210\300 \207" [tmm-add-prompt (#0) remove-hook 
> minibuffer-setup-hook] 3]

Indeed, prin1 has a two ways to prevent infinite recursion:
- limit the print to a certain depth
- detect when we start printing that we're already in the process of
  printing, and then replace it with #N where N is some kind of depth of
  the reference (so #0 refers to the whole object that we're in the
  process of printing).

cl-prin1 doesn't offer these safety belts, currently (I always set
print-circle).


        Stefan