OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

[multiple changes]

Browse Source 
2009-05-06  Robert Dewar  <dewar@adacore.com>

	* s-fileio.adb: Minor comment update

	* sem_ch8.adb: Minor reformatting

	* exp_ch3.adb: Update comments.

2009-05-06  Tristan Gingold  <gingold@adacore.com>

	* init.c, s-osinte-darwin.ads: Reduce alternate stack size

From-SVN: r147167
This commit is contained in:
Arnaud Charlet 2009-05-06 12:15:30 +02:00
parent 965dbd5cd4
commit deef4289f2
6 changed files with 22 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
gcc/ada/ChangeLog
View File

@ -1,3 +1,15 @@
2009-05-06 Robert Dewar <dewar@adacore.com>
* s-fileio.adb: Minor comment update
* sem_ch8.adb: Minor reformatting
* exp_ch3.adb: Update comments.
2009-05-06 Tristan Gingold <gingold@adacore.com>
* init.c, s-osinte-darwin.ads: Reduce alternate stack size
2009-05-06 Arnaud Charlet <charlet@adacore.com>
* gcc-interface/Makefile.in: Update LIBGNAT_TARGET_PAIRS for Xenomai.
@ -15,10 +27,6 @@
body of an instance is traversed before the instance itself, making
this patch redundant.
2009-05-06 Robert Dewar <dewar@adacore.com>
* sem_aggr.adb: Minor code clean-up
2009-05-06 Gary Dismukes <dismukes@adacore.com>
* sem_aggr.adb: Fix typo.

2
gcc/ada/exp_ch3.adb
View File

@ -4773,8 +4773,6 @@ package body Exp_Ch3 is
-- provided that X is not aliased. The aliased case has to be
-- excluded in general because Expr will not be aliased in general.
-- We also exclude controlled types because X and Expr may need to
-- be attached to distinct finalization lists.
if Rewrite_As_Renaming then
Rewrite (N,

2
gcc/ada/init.c
View File

@ -2102,7 +2102,7 @@ __gnat_install_handler(void)
#include <mach/vm_statistics.h>
/* This must be in keeping with System.OS_Interface.Alternate_Stack_Size. */
char __gnat_alternate_stack[64 * 1024]; /* 2 * MINSIGSTKSZ */
char __gnat_alternate_stack[32 * 1024]; /* 1 * MINSIGSTKSZ */
static void __gnat_error_handler (int sig, siginfo_t * si, void * uc);

5
gcc/ada/s-fileio.adb
View File

@ -77,8 +77,9 @@ package body System.File_IO is
-- The closing of all open files and deletion of temporary files is an
-- action that takes place at the end of execution of the main program.
-- This action is implemented using a library level object which gets
-- finalized at the end of program execution. Note that the type should be
-- limited, in order to avoid unwanted optimizations.
-- finalized at the end of program execution. Note that the type is
-- limited, in order to stop the compiler optimizing away the declaration
-- which would be allowed in the non-limited case.
procedure Finalize (V : in out File_IO_Clean_Up_Type);
-- This is the finalize operation that is used to do the cleanup

2
gcc/ada/s-osinte-darwin.ads
View File

@ -285,7 +285,7 @@ package System.OS_Interface is
pragma Import (C, Alternate_Stack, "__gnat_alternate_stack");
-- The alternate signal stack for stack overflows
Alternate_Stack_Size : constant := 64 * 1024;
Alternate_Stack_Size : constant := 32 * 1024;
-- This must be in keeping with init.c:__gnat_alternate_stack
Stack_Base_Available : constant Boolean := False;

8
gcc/ada/sem_ch8.adb
View File

@ -3741,7 +3741,8 @@ package body Sem_Ch8 is
while Present (Ent) loop
if Is_Potentially_Use_Visible (Ent) then
if not Hidden then
Error_Msg_N ("multiple use clauses cause hiding!", N);
Error_Msg_N -- CODEFIX
("multiple use clauses cause hiding!", N);
Hidden := True;
end if;
@ -3961,7 +3962,8 @@ package body Sem_Ch8 is
end loop;
if Present (Ematch) then
Error_Msg_NE ("\possible misspelling of&", N, Ematch);
Error_Msg_NE -- CODEFIX
("\possible misspelling of&", N, Ematch);
end if;
end;
end if;
@ -4747,7 +4749,7 @@ package body Sem_Ch8 is
if Is_Bad_Spelling_Of (Chars (Id), Chars (Selector))
and then not Is_Internal_Name (Chars (Id))
then
Error_Msg_NE
Error_Msg_NE -- CODEFIX
("possible misspelling of&", Selector, Id);
exit;
end if;