Fix a latent bug discovered in local testing with CCL.

It turns out that when using *print-pretty* in CCL we then have CL reader
references in the output, such as in the following example:

  QUERY: comment on table mysql.base64 is $#1=DXIDC_EMLAQ$Test decoding base64 documents$#1#$

Of course that's wrong, so prevent this from happening by
forcing *print-pretty* to nil in a top-level function. We still turn this on
in the monitor thread when printing error messages as those might contain
recursive data structures.

src/api.lisp

@@ -152,7 +152,8 @@ Parameters here are meant to be already parsed, see parse-cli-optargs."
    then run, or a commands string that is then parsed and each command run."
 
   (with-monitor (:start-logger start-logger)
-    (let* ((funcs
+    (let* ((*print-circle* nil)
+           (funcs
             (typecase source
               (function (list source))