ada: init.c (__gnat_error_handler): Cast msg to const char *.
* env.c [__alpha__ && __osf__] (_BSD): Define. * init.c [__alpha__ && __osf__] (__gnat_error_handler): Cast msg to const char *. From-SVN: r151938
This commit is contained in:
parent
d9334061ea
commit
576891f9a6
|
@ -1,3 +1,9 @@
|
||||||
|
2009-09-21 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
|
||||||
|
|
||||||
|
* env.c [__alpha__ && __osf__] (_BSD): Define.
|
||||||
|
* init.c [__alpha__ && __osf__] (__gnat_error_handler): Cast msg
|
||||||
|
to const char *.
|
||||||
|
|
||||||
2009-09-18 Pascal Obry <obry@adacore.com>
|
2009-09-18 Pascal Obry <obry@adacore.com>
|
||||||
|
|
||||||
* mingw32.h: Activate Unicode support for x86-64 Windows platform.
|
* mingw32.h: Activate Unicode support for x86-64 Windows platform.
|
||||||
|
|
|
@ -29,6 +29,11 @@
|
||||||
* *
|
* *
|
||||||
****************************************************************************/
|
****************************************************************************/
|
||||||
|
|
||||||
|
/* Tru64 UNIX <stdlib.h> declares unsetenv() only if _BSD. */
|
||||||
|
#if defined (__alpha__) && defined (__osf__)
|
||||||
|
#define _BSD
|
||||||
|
#endif
|
||||||
|
|
||||||
#ifdef IN_RTS
|
#ifdef IN_RTS
|
||||||
#include "tconfig.h"
|
#include "tconfig.h"
|
||||||
#include "tsystem.h"
|
#include "tsystem.h"
|
||||||
|
|
|
@ -376,7 +376,7 @@ __gnat_error_handler
|
||||||
}
|
}
|
||||||
|
|
||||||
recurse = 0;
|
recurse = 0;
|
||||||
Raise_From_Signal_Handler (exception, (char *) msg);
|
Raise_From_Signal_Handler (exception, (const char *) msg);
|
||||||
}
|
}
|
||||||
|
|
||||||
void
|
void
|
||||||
|
|
Loading…
Reference in New Issue