ali.ads, ali.adb (Get_Nat): Raise an exception if the file cursor is not on a natural.
authorQuentin Ochem <ochem@adacore.com>
Fri, 6 Apr 2007 09:17:01 +0000 (11:17 +0200)
committerArnaud Charlet <charlet@gcc.gnu.org>
Fri, 6 Apr 2007 09:17:01 +0000 (11:17 +0200)
commit35a41b73c7dace49b7abd8b8a6fdc6d58a5e612a
tree4bcff816ebdb41bea765ca1719759ac07fd664c7
parent320ae22ae0b8d417adf8da52e195eb9aaa026688
ali.ads, ali.adb (Get_Nat): Raise an exception if the file cursor is not on a natural.

2007-04-06  Quentin Ochem  <ochem@adacore.com>

* ali.ads, ali.adb (Get_Nat): Raise an exception if the file cursor is
not on a natural.
(Scan_ALI): Cancel the xref line if there has been a reading ALI error.

From-SVN: r123548
gcc/ada/ali.adb
gcc/ada/ali.ads