Use cl-labels which behaves like a flet*