core_alloc changed to old one

This commit is contained in:
ceriel 1987-05-21 10:10:27 +00:00
parent 4caf71f5b5
commit 6ac092bf38

View file

@ -482,15 +482,8 @@ core_alloc(piece, size)
{
register ind_t off;
if ((off = alloc(piece, size)) == BADOFF) {
int sv = alloctype;
alloctype = FORCED;
off = alloc(piece, size);
alloctype = sv;
if (off == BADOFF)
return (char *)0;
}
if ((off = alloc(piece, size)) == BADOFF)
return (char *)0;
return address(piece, off);
}