d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Renamed the private 'atol()' function to 'our_atol()' to avoid clashes with the libc one.

Browse source
This commit is contained in:
dtrg 2006-07-18 16:57:51 +00:00
parent 13a9ff3379
commit 2aca7fbaf4
2 changed files with 8 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
mach/proto/cg/fillem.c
View file

@ -2,7 +2,9 @@
static char rcsid2[] = "$Id$"; static char rcsid2[] = "$Id$";
#endif #endif
#include <stdlib.h>
#include <stdio.h> #include <stdio.h>
#include <string.h>
#include "assert.h" #include "assert.h"
#include <em_spec.h> #include <em_spec.h>
#include <em_pseu.h> #include <em_pseu.h>
@ -87,7 +89,7 @@ extern double atof();
/* Own version of atol that continues computing on overflow. /* Own version of atol that continues computing on overflow.
We don't know that about the ANSI C one. We don't know that about the ANSI C one.
*/ */
long atol(s) long our_atol(s)
register char *s; register char *s;
{ {
register long total = 0; register long total = 0;
@ -616,7 +618,7 @@ long con(t) {
part_flush(); part_flush();
con_mult((word)argval); con_mult((word)argval);
} else { } else {
con_part((int)argval,(word)atol(str)); con_part((int)argval,(word)our_atol(str));
} }
return(argval); return(argval);
case sp_fcon: case sp_fcon:

6
mach/proto/ncg/fillem.c
View file

@ -2,7 +2,9 @@
static char rcsid2[] = "$Id$"; static char rcsid2[] = "$Id$";
#endif #endif
#include <stdlib.h>
#include <stdio.h> #include <stdio.h>
#include <string.h>
#include "assert.h" #include "assert.h"
#include <em_spec.h> #include <em_spec.h>
#include <em_pseu.h> #include <em_pseu.h>
@ -85,7 +87,7 @@ extern double atof();
/* Own version of atol that continues computing on overflow. /* Own version of atol that continues computing on overflow.
We don't know that about the ANSI C one. We don't know that about the ANSI C one.
*/ */
long atol(s) long our_atol(s)
register char *s; register char *s;
{ {
register long total = 0; register long total = 0;
@ -657,7 +659,7 @@ long con(t) {
part_flush(); part_flush();
con_mult((word)argval); con_mult((word)argval);
} else { } else {
con_part((int)argval,(word)atol(str)); con_part((int)argval,(word)our_atol(str));
} }
return(argval); return(argval);
case sp_fcon: case sp_fcon: