empty_vector_length.adb
395 Bytes
-
trans.c (Attribute_to_gnu): Compute as (hb < lb) ? 0 : hb - lb + 1 instead of max (hb - lb + 1, 0). · f43516412008-03-21 Olivier Hainque <hainque@adacore.com> ada/ * trans.c (Attribute_to_gnu) <'length>: Compute as (hb < lb) ? 0 : hb - lb + 1 instead of max (hb - lb + 1, 0). testsuite/ * gnat.dg/empty_vector_length.adb: New testcase. From-SVN: r133423
Olivier Hainque committed