while loop macro example