Further reduction: (flet ((whoop () (if (> (random 1.0) .5) (funcall (flet ((bar ())) #'bar)) (funcall (flet ((fez () (funcall (flet ((foo ())) #'foo)))) #'fez))))) #'whoop)
Further reduction:
( funcall (flet ((bar ())) #'bar))
( funcall (flet ((fez ()
(funcall (flet ((foo ())) #'foo))))
#'fez) ))))
(flet ((whoop ()
(if (> (random 1.0) .5)
#'whoop)