Function

Summary

Provides information about the fragmentation in a generation in 32-bit LispWorks.

Package

hcl

Signature

check-fragmentation gen-num => total-free, total-small-blocks, total-large-blocks

Arguments

gen-num

0 for the most recent generation, 1 for the most recent two generations, and so on up to a maximum (usually 3). Numbers outside this range signal an error.

Values

total-free

Total free space in the generation.

total-small-blocks

Amount of free space in the generation which is available in blocks of 512 bytes or larger.

total-large-blocks

Amount of free space in the generation which is available in blocks of 4096 bytes or larger.

Description

The latter two values give indication of the level of fragmentation in the generation. This information can be used, for example, to decide whether to call try-move-in-generation.

Notes

check-fragmentation is implemented only in 32-bit LispWorks. It is not relevant to the Memory Management API in 64-bit implementations, where gen-num-segments-fragmentation-state is available instead.

See also

try-compact-in-generation
try-move-in-generation
Guidance for control of the storage management system