trunk/gnat:157601
