macro ONCE-ONLY from Practical Common Lisp

ONCE-ONLY is used to generate code that evaluates certain
macro arguments once only and in a particular order.