trunk/gnat:175009
