This is the mail archive of the gcc-patches@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[Ada] Minor reformatting


2001-12-14  Geert Bosch <bosch@gnat.com>

	* config-lang.in: Update copyright notice

	* layout.adb: Remove commented out code.

	* mdllfile.ads: Update copyright notice. Fix header format.

	* sem_case.ads: Likewise.

	* sem_ch3.adb: Minor reformatting.

Index: config-lang.in
===================================================================
RCS file: /cvs/gcc/gcc/gcc/ada/config-lang.in,v
retrieving revision 1.2
diff -c -r1.2 config-lang.in
*** config-lang.in	2001/10/09 10:16:08	1.2
--- config-lang.in	2001/12/14 22:25:42
***************
*** 1,5 ****
  # Top level configure fragment for GNU Ada (GNAT).
! #   Copyright (C) 1994 Free Software Foundation, Inc.
  
  #This file is part of GNU CC.
  
--- 1,5 ----
  # Top level configure fragment for GNU Ada (GNAT).
! #   Copyright (C) 1994-2001 Free Software Foundation, Inc.
  
  #This file is part of GNU CC.
  
Index: layout.adb
===================================================================
RCS file: /cvs/gcc/gcc/gcc/ada/layout.adb,v
retrieving revision 1.4
diff -c -r1.4 layout.adb
*** layout.adb	2001/12/05 02:00:43	1.4
--- layout.adb	2001/12/14 22:25:42
***************
*** 39,45 ****
  with Sem;      use Sem;
  with Sem_Ch13; use Sem_Ch13;
  with Sem_Eval; use Sem_Eval;
- --  with Sem_Res;  use Sem_Res;
  with Sem_Util; use Sem_Util;
  with Sinfo;    use Sinfo;
  with Snames;   use Snames;
--- 39,44 ----
Index: mdllfile.ads
===================================================================
RCS file: /cvs/gcc/gcc/gcc/ada/mdllfile.ads,v
retrieving revision 1.3
diff -c -r1.3 mdllfile.ads
*** mdllfile.ads	2001/12/12 21:26:44	1.3
--- mdllfile.ads	2001/12/14 22:25:42
***************
*** 6,14 ****
  --                                                                          --
  --                                 S p e c                                  --
  --                                                                          --
! --                            $Revision$                              --
  --                                                                          --
! --          Copyright (C) 1992-1999 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- --
--- 6,14 ----
  --                                                                          --
  --                                 S p e c                                  --
  --                                                                          --
! --                            $Revision$
  --                                                                          --
! --          Copyright (C) 1992-2001 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- --
Index: sem_case.ads
===================================================================
RCS file: /cvs/gcc/gcc/gcc/ada/sem_case.ads,v
retrieving revision 1.2
diff -c -r1.2 sem_case.ads
*** sem_case.ads	2001/10/28 12:55:54	1.2
--- sem_case.ads	2001/12/14 22:25:42
***************
*** 6,14 ****
  --                                                                          --
  --                                 S p e c                                  --
  --                                                                          --
! --                            $Revision$                              --
  --                                                                          --
! --            Copyright (C) 1996 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- --
--- 6,14 ----
  --                                                                          --
  --                                 S p e c                                  --
  --                                                                          --
! --                            $Revision$
  --                                                                          --
! --         Copyright (C) 1996-2001 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- --
Index: sem_ch3.adb
===================================================================
RCS file: /cvs/gcc/gcc/gcc/ada/sem_ch3.adb,v
retrieving revision 1.9
diff -c -r1.9 sem_ch3.adb
*** sem_ch3.adb	2001/12/11 22:25:15	1.9
--- sem_ch3.adb	2001/12/14 22:25:45
***************
*** 1605,1611 ****
              null;
  
           elsif Nkind (E) = N_Raise_Constraint_Error then
!             --  Aggregate is statically illegal. Place back in declaration.
              Set_Expression (N, E);
              Set_No_Initialization (N, False);
  
--- 1605,1613 ----
              null;
  
           elsif Nkind (E) = N_Raise_Constraint_Error then
! 
!             --  Aggregate is statically illegal. Place back in declaration
! 
              Set_Expression (N, E);
              Set_No_Initialization (N, False);
  


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]