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

libgfortran.h (itoa): Rename to gfc_itoa.

Browse Source 
* libgfortran.h (itoa): Rename to gfc_itoa.
	* io/write.c (itoa): Same.
	* runtime/environ.c (itoa): Same.
	* runtime/error.c (itoa): Same.

From-SVN: r92380
This commit is contained in:
Aaron W. LaFramboise 2004-12-19 12:54:00 -06:00 committed by Aaron W. LaFramboise
parent 8d19f04f49
commit 9548f05908
5 changed files with 16 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
libgfortran/ChangeLog
View File

@ -1,3 +1,11 @@
2004-12-19 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
PR libfortran/19074
* libgfortran.h (itoa): Rename to gfc_itoa.
* io/write.c (itoa): Same.
* runtime/environ.c (itoa): Same.
* runtime/error.c (itoa): Same.
2004-12-15 Bud Davis <bdavis9659@comcast.net>
Steven G. Kargl <kargls@comcast.net>

4
libgfortran/io/write.c
View File

@ -928,7 +928,7 @@ btoa (uint64_t n)
void
write_i (fnode * f, const char *p, int len)
{
write_decimal (f, p, len, (void *) itoa);
write_decimal (f, p, len, (void *) gfc_itoa);
}
@ -1042,7 +1042,7 @@ write_integer (const char *source, int length)
int digits;
int width;
q = itoa (extract_int (source, length));
q = gfc_itoa (extract_int (source, length));
switch (length)
{

4
libgfortran/libgfortran.h
View File

@ -370,8 +370,8 @@ internal_proto(get_args);
/* error.c */
extern char *itoa (int64_t);
internal_proto(itoa);
extern char *gfc_itoa (int64_t);
internal_proto(gfc_itoa);
extern char *xtoa (uint64_t);
internal_proto(xtoa);

2
libgfortran/runtime/environ.c
View File

@ -551,7 +551,7 @@ check_buffered (int n)
return 0;
strcpy (name, "GFORTRAN_UNBUFFERED_");
strcat (name, itoa (n));
strcat (name, gfc_itoa (n));
v.name = name;
v.value = 2;

6
libgfortran/runtime/error.c
View File

@ -60,7 +60,7 @@ static char buffer[32]; /* buffer for integer/ascii conversions */
/* Returns a pointer to a static buffer. */
char *
itoa (int64_t n)
gfc_itoa (int64_t n)
{
int negative;
char *p;
@ -177,7 +177,7 @@ st_printf (const char *format, ...)
break;
case 'd':
q = itoa (va_arg (arg, int));
q = gfc_itoa (va_arg (arg, int));
count = strlen (q);
p = salloc_w (s, &count);
@ -254,7 +254,7 @@ st_sprintf (char *buffer, const char *format, ...)
break;
case 'd':
p = itoa (va_arg (arg, int));
p = gfc_itoa (va_arg (arg, int));
count = strlen (p);
memcpy (buffer, p, count);