Custom Query (1030 matches)

The spec says that a warning should be issued if a variable declared to be ignored is declared SPECIAL, as in:

(defun foo (x y)
 (declare (ignore y))
 ...
 (locally
   (declare (special y))
   ...))

That code doesn't make much sense, but it clearly deservers a warning.

(defparameter y ...)

(defun foo (x y)
 (declare (ignore y))
 ...)

is about the same thing, but the warning in both cases should probably complain that inconsistent declarations applied to Y and not just say that it "wasn't IGNOREd".

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.

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 ?