Minor reformatting.
From-SVN: r197801
This commit is contained in:
parent
7eb29ac8d3
commit
088c0a3a4a
1 changed files with 4 additions and 4 deletions
|
@ -6,7 +6,7 @@
|
|||
-- --
|
||||
-- B o d y --
|
||||
-- --
|
||||
-- Copyright (C) 1992-2012, Free Software Foundation, Inc. --
|
||||
-- Copyright (C) 1992-2013, Free Software Foundation, Inc. --
|
||||
-- --
|
||||
-- GNAT is free software; you can redistribute it and/or modify it under --
|
||||
-- terms of the GNU General Public License as published by the Free Soft- --
|
||||
|
@ -1331,9 +1331,9 @@ package body ALI is
|
|||
when Constraint_Error =>
|
||||
|
||||
-- A constraint error comes from the
|
||||
-- additionh. We reset to the maximum
|
||||
-- and indicate that the real value is
|
||||
-- now unknown.
|
||||
-- addition. We reset to the maximum
|
||||
-- and indicate that the real value
|
||||
-- is now unknown.
|
||||
|
||||
Cumulative_Restrictions.Value (R) :=
|
||||
Integer'Last;
|
||||
|
|
Loading…
Add table
Reference in a new issue