Commit 449d2be3 by Geert Bosch Committed by Geert Bosch

config-lang.in: Update copyright notice

	* 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.

From-SVN: r48014
parent 1808372b
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.
2001-12-12 Geert Bosch <bosch@gnat.com> 2001-12-12 Geert Bosch <bosch@gnat.com>
* freeze.ads: Update copyright date. * freeze.ads: Update copyright date.
......
# Top level configure fragment for GNU Ada (GNAT). # Top level configure fragment for GNU Ada (GNAT).
# Copyright (C) 1994 Free Software Foundation, Inc. # Copyright (C) 1994-2001 Free Software Foundation, Inc.
#This file is part of GNU CC. #This file is part of GNU CC.
......
...@@ -39,7 +39,6 @@ with Repinfo; use Repinfo; ...@@ -39,7 +39,6 @@ with Repinfo; use Repinfo;
with Sem; use Sem; with Sem; use Sem;
with Sem_Ch13; use Sem_Ch13; with Sem_Ch13; use Sem_Ch13;
with Sem_Eval; use Sem_Eval; with Sem_Eval; use Sem_Eval;
-- with Sem_Res; use Sem_Res;
with Sem_Util; use Sem_Util; with Sem_Util; use Sem_Util;
with Sinfo; use Sinfo; with Sinfo; use Sinfo;
with Snames; use Snames; with Snames; use Snames;
......
...@@ -6,9 +6,9 @@ ...@@ -6,9 +6,9 @@
-- -- -- --
-- S p e c -- -- S p e c --
-- -- -- --
-- $Revision$ -- -- $Revision$
-- -- -- --
-- Copyright (C) 1992-1999 Free Software Foundation, Inc. -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. --
-- -- -- --
-- GNAT is free software; you can redistribute it and/or modify it under -- -- 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- -- -- terms of the GNU General Public License as published by the Free Soft- --
......
...@@ -6,9 +6,9 @@ ...@@ -6,9 +6,9 @@
-- -- -- --
-- S p e c -- -- S p e c --
-- -- -- --
-- $Revision: 1.1 $ -- -- $Revision$
-- -- -- --
-- Copyright (C) 1996 Free Software Foundation, Inc. -- -- Copyright (C) 1996-2001 Free Software Foundation, Inc. --
-- -- -- --
-- GNAT is free software; you can redistribute it and/or modify it under -- -- 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- -- -- terms of the GNU General Public License as published by the Free Soft- --
......
...@@ -1605,7 +1605,9 @@ package body Sem_Ch3 is ...@@ -1605,7 +1605,9 @@ package body Sem_Ch3 is
null; null;
elsif Nkind (E) = N_Raise_Constraint_Error then elsif Nkind (E) = N_Raise_Constraint_Error then
-- Aggregate is statically illegal. Place back in declaration.
-- Aggregate is statically illegal. Place back in declaration
Set_Expression (N, E); Set_Expression (N, E);
Set_No_Initialization (N, False); Set_No_Initialization (N, False);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment