Fix bug reported by Drew McDermott, cmucl-help, 2005/12/07.
(defun spunk (a b) (let (k m p q) (multiple-value-setq (k m p q) (the (values t t t t) (punk a b))))) Remove the assertion that the values type must have no required args and adjust maybe-negate-check appropriately. (This last from Alexey Dejneka.)
Loading
Please register or sign in to comment