[Ada] gnatbind: Correct assertions in Add_Edge_Kind_Check
authorBob Duff <duff@adacore.com>
Fri, 28 Feb 2020 14:46:07 +0000 (09:46 -0500)
committerPierre-Marie de Rodat <derodat@adacore.com>
Tue, 9 Jun 2020 08:09:02 +0000 (04:09 -0400)
commit059a704a4195f49c299ab0e92f772df39a27971a
tree169f1653795111651eacebf1a27bcc80f1213c1d
parent338c32f1375440aaeb66c65d5d40906a388d20c8
[Ada] gnatbind: Correct assertions in Add_Edge_Kind_Check

2020-06-09  Bob Duff  <duff@adacore.com>

gcc/ada/

* bindo-graphs.ads (Library_Graph_Edge_Kind): Reorder enumerals
to reflect the order of adding edges. Clarify comments.
* bindo-graphs.adb (Add_Edge_Kind_Check): Correct the
assertions.  Reorder the "when"s to match the order of adding
edges, and therefore the order of enumerals in type
Library_Graph_Edge_Kind.  Change names to "Old_" and "New_" to
clarify what's what.  Combine Invocation_Edge into the "<="
test.  Fix the "raise Program_Error" message, which was
backwards.
gcc/ada/bindo-graphs.adb
gcc/ada/bindo-graphs.ads