static long freen;
#define MARKSIZE sizeof (void *)
-#define MARKINCR 100
+#define MARKINCR 100l
static void **markarray;
static long markn, marki;
freearray = Marrayalloc ((long) FREESIZE);
freen = 1;
freearray[0] = NULL;
- markarray = Marrayalloc ((long) MARKINCR * MARKSIZE);
+ markarray = Marrayalloc(MARKINCR * MARKSIZE);
markn = MARKINCR;
marki = 0;
otarray[0] = Marrayalloc(OTINCR * OTSIZE);
long Mpushmark (void *p) {
if (marki == markn) {
- markarray = Marraygrow (
- markarray, (long) (markn + MARKINCR) * MARKSIZE
- );
+ markarray = Marraygrow(markarray, (markn + MARKINCR) * MARKSIZE);
markn += MARKINCR;
}
markarray[marki++] = p;