added is_control() tests