git
/
gcc
mirror of git://gcc.gnu.org/git/gcc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

adaint.c (__gnat_get_libraries_from_registry): Cast value to LPBYTE. 

* adaint.c (__gnat_get_libraries_from_registry): Cast value
        to LPBYTE.
	(__gnat_portable_spawn): Remove const.

	* mingw32.h (MAXPATHLEN): Check for previous definition.

From-SVN: r89323
This commit is contained in:
Aaron W. LaFramboise 2004-10-20 02:05:09 -06:00 committed by Aaron W. LaFramboise
parent fd460b7740
commit aa75e737b8
3 changed files with 12 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
gcc/ada/ChangeLog
View File

@ -1,3 +1,11 @@
2004-10-10 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
* adaint.c (__gnat_get_libraries_from_registry): Cast value
to LPBYTE.
(__gnat_portable_spawn): Remove const.
* mingw32.h (MAXPATHLEN): Check for previous definition.
2004-10-17 Matthias Klose <doko@debian.org>
* gnatvsn.ads: Set gnat library version to 4.0.

4
gcc/ada/adaint.c
View File

@ -1348,7 +1348,7 @@ __gnat_get_libraries_from_registry (void)
{
value_size = name_size = 256;
res = RegEnumValue (reg_key, index, name, &name_size, 0,
&type, value, &value_size);
&type, (LPBYTE)value, &value_size);
if (res == ERROR_SUCCESS && type == REG_SZ)
{
@ -1551,7 +1551,7 @@ __gnat_portable_spawn (char *args[])
#if defined (MSDOS) || defined (_WIN32)
/* args[0] must be quotes as it could contain a full pathname with spaces */
const char *args_0 = args[0];
char *args_0 = args[0];
args[0] = (char *)xmalloc (strlen (args_0) + 3);
strcpy (args[0], "\"");
strcat (args[0], args_0);

2
gcc/ada/mingw32.h
View File

@ -49,6 +49,8 @@
#define OLD_MINGW (!(STD_MINGW))
#ifndef MAXPATHLEN
#define MAXPATHLEN MAX_PATH
#endif
#endif /* _MINGW32_H */