2008-07-31 Vincent Celier <celier@adacore.com>