parquet_debug_set_sort_radix_fail_alloc Interface

interface
public module subroutine parquet_debug_set_sort_radix_fail_alloc(which)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: which

which allocation reports failure; 0 none.

Description

Test-only forcing of an allocation failure in the radix path, to reach its fallbacks.

Selects WHICH allocation fails, because they are in series and a single flag would make the first mask every later one: 0 none, 1 the main scratch, 2 the deep string refine's, 3 the threaded tier split's counters, 4 Design B's task arrays, and 5 to 8 the four grow_run_list makes in turn. Every fallback answers identically, so no assertion on a permutation can tell one apart from the ordinary path -- pair 1 and 2 with the insertion-shift tracker, which can.