Bug in Allegro 10 preview -- Was Re: Tests failing on Allegro 10 preview, Mac OS X

Faré fahree at gmail.com
Mon Aug 31 00:01:32 UTC 2015


On Sun, Aug 30, 2015 at 6:54 PM, Kevin Layer <layer at franz.com> wrote:
> Great, thanks!
>
Even slightly more reduced:

(defun two-optionals (&optional (o1 :default1) (o2 :default2))
  (format t "TWO-OPTIONALS ~S ~S~%" o1 o2)
  (lambda (x) o2)
  (if (equal o1 :parameter) :success :failure))

(trace two-optionals)

(format t "TEST ~A~%" (two-optionals :parameter))

—♯ƒ • François-René ÐVB Rideau •Reflection&Cybernethics• http://fare.tunes.org
Does artillery violate the natural rights of the target? I would say: the
entire *purpose* of artillery is to violate the natural rights of the target.
        — Mencius Moldbug



More information about the asdf-devel mailing list