Conditional blocks for Allegro Common Lisp.