2009-08-01 Paul Thomas <pault@gcc.gnu.org>

[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gnat.dg / sort1.ads

function sort1 (S : String) return String;
pragma Pure (sort1);