Custom Query (1030 matches)

I was surprised that ccl:save-application called ccl:*lisp-cleanup-functions* before saving the image. I expected a snapshot of the current image (this is the behavior of other implementations), not an image in a post-shutdown state.

I can use ccl:*save-exit-functions* to save the desired state, or restore state with ccl:*lisp-startup-functions*, but neither may be easy in general.

If it is decided that the current behavior is preferred, then at least document it in ccl:save-application or elsewhere, as it differs from other implementations.

The CL HyperSpec says of *print-radix*:

For integers, base ten is indicated by a trailing decimal point instead of a leading radix specifier; for ratios, #10r is used.

Yet CCL omits the leading "#10r" in the example shown below. I did the same test in Allegro CL, CLISP, CMUCL, GCL, Lispworks, and SBCL, and each of those printed "#10r4/5" rather than "4/5".

Welcome to Clozure Common Lisp Version 1.9-dev-r15503M-trunk (LinuxX8664)! ? (setq *print-base* 10 *print-radix* t) T ? 4/5 4/5 ?

The sharp-double-quote example in Let Over Lisp requires the addition of an extra " at the end of the expression in order to allow return to evaluate the expression in the REPL. The following code:

(defun |#"-reader| (stream sub-char numarg)
  (declare (ignore sub-char numarg))
  (let (chars)
    (do ((prev (read-char stream) curr)
         (curr (read-char stream) (read-char stream)))
        ((and (char= prev #\") (char= curr #\#)))
      (push prev chars))
    (coerce (nreverse chars) 'string)))

(set-dispatch-macro-character 
 #\# #\" #'|#"-reader|)

should produce a the following:

? #"contains " and \."#
"contains \" and \\."

However, to produce that result you'll have to add an additional " to the end of the expression, which shouldn't be required.