changeset 11532 | bf86c6cb9341 |
parent 10560 | 9f09196d92a6 |
child 13928 | c36aaa30be98 |
--- a/hedgewars/uLandOutline.pas Sun Jan 24 00:02:57 2016 +0100 +++ b/hedgewars/uLandOutline.pas Sun Jan 31 16:07:14 2016 +0300 @@ -30,7 +30,7 @@ procedure Push(_xl, _xr, _y, _dir: LongInt); begin - TryDo(Stack.Count <= 8192, 'FillLand: stack overflow', true); + if checkFails(Stack.Count <= 8192, 'FillLand: stack overflow', true) then exit; _y:= _y + _dir; if (_y < 0) or (_y >= LAND_HEIGHT) then exit;