Renamed the private 'atol()' function to 'our_atol()' to avoid clashes with the libc one.
This commit is contained in:
parent
c5f106f53e
commit
71e0d85a11
@ -2,7 +2,9 @@
|
||||
static char rcsid2[] = "$Id$";
|
||||
#endif
|
||||
|
||||
#include <stdlib.h>
|
||||
#include <stdio.h>
|
||||
#include <string.h>
|
||||
#include "assert.h"
|
||||
#include <em_spec.h>
|
||||
#include <em_pseu.h>
|
||||
@ -87,7 +89,7 @@ extern double atof();
|
||||
/* Own version of atol that continues computing on overflow.
|
||||
We don't know that about the ANSI C one.
|
||||
*/
|
||||
long atol(s)
|
||||
long our_atol(s)
|
||||
register char *s;
|
||||
{
|
||||
register long total = 0;
|
||||
@ -616,7 +618,7 @@ long con(t) {
|
||||
part_flush();
|
||||
con_mult((word)argval);
|
||||
} else {
|
||||
con_part((int)argval,(word)atol(str));
|
||||
con_part((int)argval,(word)our_atol(str));
|
||||
}
|
||||
return(argval);
|
||||
case sp_fcon:
|
||||
|
||||
@ -2,7 +2,9 @@
|
||||
static char rcsid2[] = "$Id$";
|
||||
#endif
|
||||
|
||||
#include <stdlib.h>
|
||||
#include <stdio.h>
|
||||
#include <string.h>
|
||||
#include "assert.h"
|
||||
#include <em_spec.h>
|
||||
#include <em_pseu.h>
|
||||
@ -85,7 +87,7 @@ extern double atof();
|
||||
/* Own version of atol that continues computing on overflow.
|
||||
We don't know that about the ANSI C one.
|
||||
*/
|
||||
long atol(s)
|
||||
long our_atol(s)
|
||||
register char *s;
|
||||
{
|
||||
register long total = 0;
|
||||
@ -657,7 +659,7 @@ long con(t) {
|
||||
part_flush();
|
||||
con_mult((word)argval);
|
||||
} else {
|
||||
con_part((int)argval,(word)atol(str));
|
||||
con_part((int)argval,(word)our_atol(str));
|
||||
}
|
||||
return(argval);
|
||||
case sp_fcon:
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user