Skip to content

Commit 8ae2597

Browse files
committed
run-time: Correct MVFF pool creation usage
* sources/lib/run-time/collector.c (MISCMAXSIZE): Remove. * sources/lib/run-time/mps-collector.c (dylan_init_memory_manager): Pass arguments required by the MVFF pool class to mps_pool_create.
1 parent 6aaa725 commit 8ae2597

File tree

2 files changed

+3
-2
lines changed

2 files changed

+3
-2
lines changed

sources/lib/run-time/collector.c

-1
Original file line numberDiff line numberDiff line change
@@ -79,7 +79,6 @@ typedef intptr_t DSINT;
7979

8080
#define MISCEXTENDBY ((size_t)16384)
8181
#define MISCAVGSIZE ((size_t)32)
82-
#define MISCMAXSIZE ((size_t)65536)
8382

8483
static void report_runtime_error (char* header, char* message);
8584

sources/lib/run-time/mps-collector.c

+3-1
Original file line numberDiff line numberDiff line change
@@ -1574,7 +1574,9 @@ MMError dylan_init_memory_manager(void)
15741574
/* Create the MVFF pool for miscellaneous objects. */
15751575
/* This is also used for wrappers. */
15761576
res = mps_pool_create(&misc_pool, arena, mps_class_mvff(),
1577-
MISCEXTENDBY, MISCAVGSIZE, MISCMAXSIZE);
1577+
MISCEXTENDBY, MISCAVGSIZE,
1578+
(size_t) 16,
1579+
TRUE, TRUE, TRUE);
15781580
if (res) { init_error("create misc pool"); return(res); }
15791581

15801582
wrapper_pool = misc_pool;

0 commit comments

Comments
 (0)