Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
home:Ledest:erlang:25
erlang
0195-Reduce-memory-consumption-for-test-of-list...
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File 0195-Reduce-memory-consumption-for-test-of-list_to_intege.patch of Package erlang
From 2fca1418582bf66fb38ebea8e8c0eb0933944b35 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Bj=C3=B6rn=20Gustavsson?= <bjorn@erlang.org> Date: Fri, 8 Dec 2023 14:03:12 +0100 Subject: [PATCH] Reduce memory consumption for test of list_to_integer/1 We could run out of memory on 32-bit Windows system. --- erts/emulator/test/list_bif_SUITE.erl | 5 ++++- erts/emulator/test/num_bif_SUITE.erl | 5 ++++- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/erts/emulator/test/list_bif_SUITE.erl b/erts/emulator/test/list_bif_SUITE.erl index 2e43e9ad5a..8951a3e806 100644 --- a/erts/emulator/test/list_bif_SUITE.erl +++ b/erts/emulator/test/list_bif_SUITE.erl @@ -60,10 +60,13 @@ t_list_to_integer(Config) when is_list(Config) -> {error,badarg} = string:to_integer($A), %% System limit. - Digits = lists:duplicate(11_000_000, $9), + Digits = lists:duplicate(3_000_000, $9), {'EXIT',{system_limit,_}} = catch list_to_integer(Digits), + _ = erlang:garbage_collect(), {'EXIT',{system_limit,_}} = catch list_to_integer(Digits, 16), + _ = erlang:garbage_collect(), {error,system_limit} = string:to_integer(Digits), + _ = erlang:garbage_collect(), ok. diff --git a/erts/emulator/test/num_bif_SUITE.erl b/erts/emulator/test/num_bif_SUITE.erl index c53b660bf5..5ea28e0244 100644 --- a/erts/emulator/test/num_bif_SUITE.erl +++ b/erts/emulator/test/num_bif_SUITE.erl @@ -673,10 +673,13 @@ t_string_to_integer(Config) when is_list(Config) -> ]), %% System limit - Digits = lists:duplicate(11_000_000, $9), + Digits = lists:duplicate(3_000_000, $9), {'EXIT',{system_limit,_}} = catch list_to_integer(Digits), + _ = erlang:garbage_collect(), {'EXIT',{system_limit,_}} = catch list_to_integer(Digits, 16), + _ = erlang:garbage_collect(), {error,system_limit} = string:to_integer(Digits), + _ = erlang:garbage_collect(), ok. -- 2.35.3
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor