diff options
| -rw-r--r-- | gcc/ada/libgnat/s-imguti.adb | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/gcc/ada/libgnat/s-imguti.adb b/gcc/ada/libgnat/s-imguti.adb index 2e69e63..4b9e27a 100644 --- a/gcc/ada/libgnat/s-imguti.adb +++ b/gcc/ada/libgnat/s-imguti.adb @@ -231,7 +231,6 @@ package body System.Img_Util is begin pragma Assert (S >= Digs'First and E <= Digs'Last); -- S and E should be in the Digs array range - -- TBC: Analysis should be completed for J in S .. E loop Set (Digs (J)); end loop; |