From d347f5722f311a63908da11d492428af8f4563a4 Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Tue, 26 Oct 2010 14:19:56 +0200 Subject: [multiple changes] 2010-10-26 Robert Dewar * einfo.ads, einfo.adb (Is_Base_Type): New function, use it where appropriate. * exp_ch6.adb, exp_dbug.adb, exp_disp.adb, freeze.adb, lib-xref.adb, sem_aux.adb, sem_ch3.adb, sem_ch7.adb, sem_ch8.adb (Is_Base_Type): Use this new abstraction where appropriate. 2010-10-26 Ed Schonberg * sem_ch12.adb: Code clean up. 2010-10-26 Paul Hilfinger * exp_dbug.ads: Document effect of 'pragma Unchecked_Union' on debugging data. 2010-10-26 Ed Schonberg * sem_util.adb (Note_Possible_Modification): If the target of an assignment is the bound variable in an iterator, the domain of iteration, i.e. array or container, is modified as well. 2010-10-26 Bob Duff * Make-generated.in: Make the relevant make targets depend on ceinfo.adb and csinfo.adb. * csinfo.adb, ceinfo.adb: Make sure it raises an exception on failure, so when called from xeinfo, the failure will be noticed. * sinfo.ads: Update comments to reflect the fact that xsinfo runs csinfo * xsinfo.adb, xeinfo.adb: Run ceinfo to check for errors. Close files. 2010-10-26 Ed Schonberg * exp_ch4.adb: Set properly parent field of operands of concatenation. 2010-10-26 Ed Schonberg * sem_res.adb (Check_Infinite_Recursion): A recursive call within a conditional expression or a case expression should not generate an infinite recursion warning. From-SVN: r165946 --- gcc/ada/csinfo.adb | 15 +++++++-------- 1 file changed, 7 insertions(+), 8 deletions(-) (limited to 'gcc/ada/csinfo.adb') diff --git a/gcc/ada/csinfo.adb b/gcc/ada/csinfo.adb index 6808dbe..ef319cf 100644 --- a/gcc/ada/csinfo.adb +++ b/gcc/ada/csinfo.adb @@ -23,10 +23,13 @@ -- -- ------------------------------------------------------------------------------ --- Program to check consistency of sinfo.ads and sinfo.adb. Checks that field --- name usage is consistent and that assertion cross-reference lists are --- correct, as well as making sure that all the comments on field name usage --- are consistent. +-- Check consistency of sinfo.ads and sinfo.adb. Checks that field name usage +-- is consistent and that assertion cross-reference lists are correct, as well +-- as making sure that all the comments on field name usage are consistent. + +-- Note that this is used both as a standalone program, and as a procedure +-- called by XSinfo. This raises an unhandled exception if it finds any +-- errors; we don't attempt any sophisticated error recovery. with Ada.Strings.Unbounded; use Ada.Strings.Unbounded; with Ada.Strings.Unbounded.Text_IO; use Ada.Strings.Unbounded.Text_IO; @@ -635,8 +638,4 @@ begin New_Line; Put_Line ("All tests completed successfully, no errors detected"); -exception - when Done => - null; - end CSinfo; -- cgit v1.1