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>
/* 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;
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:
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>
/* 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;
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: