mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-26 16:51:46 -07:00
Code Issues Projects Releases Wiki Activity

Avoid division by zero.

Browse source 
Copied from Perforce
 Change: 194983
This commit is contained in:
Gareth Rees 2018-08-14 09:51:41 +01:00
parent 09066b0ef4
commit bfe482e9e8
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
mps/code/arena.c
View file

@ -249,8 +249,9 @@ static Res ArenaAbsInit(Arena arena, Size grainSize, ArgList args)
commitLimit = arg.val.size;
/* MPS_KEY_SPARE_COMMIT_LIMIT is deprecated */
if (ArgPick(&arg, args, MPS_KEY_SPARE_COMMIT_LIMIT)) {
spare = (double)arg.val.size / (double)commitLimit;
if (spare > 1.0)
if (0 < commitLimit && commitLimit <= arg.val.size)
spare = (double)arg.val.size / (double)commitLimit;
else
spare = 1.0;
}
if (ArgPick(&arg, args, MPS_KEY_SPARE))