changed behaviour of Allocate(..., 0)
This commit is contained in:
parent
9fb5d02aa9
commit
1347076988
|
@ -67,7 +67,7 @@ IMPLEMENTATION MODULE Storage;
|
|||
END;
|
||||
nu := (size + (UNIT-1)) DIV UNIT;
|
||||
IF nu = 0 THEN
|
||||
RETURN NIL;
|
||||
nu := 1;
|
||||
END;
|
||||
IF nu <= NLISTS THEN
|
||||
b := nu;
|
||||
|
|
Loading…
Reference in a new issue