re PR ada/17527 (Ada Bootstrap problem because of -Werror)

PR ada/17527
	* init.c: Fix warnings on Free BSD section.

From-SVN: r92841
This commit is contained in:
Arnaud Charlet 2005-01-03 16:38:54 +01:00
parent 8bded5832c
commit 02d0677655

View File

@ -6,7 +6,7 @@
* *
* C Implementation File *
* *
* Copyright (C) 1992-2004 Free Software Foundation, Inc. *
* Copyright (C) 1992-2005 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- *
@ -1577,14 +1577,14 @@ __gnat_initialize(void)
#include <signal.h>
#include <unistd.h>
static void __gnat_error_handler (int, int, struct sigcontext *);
static void
__gnat_error_handler (sig, code, sc)
int sig;
int code;
struct sigcontext *sc;
__gnat_error_handler (int sig, int code __attribute__ ((unused)),
struct sigcontext *sc __attribute__ ((unused)))
{
struct Exception_Data *exception;
char *msg;
const char *msg;
switch (sig)
{
@ -1635,8 +1635,6 @@ __gnat_install_handler ()
(void) sigaction (SIGBUS, &act, NULL);
}
void __gnat_init_float ();
void
__gnat_initialize ()
{