Macro While

Part of:

package kmrcl
( while < test > &body < body > )