Number of names in the canonical-diagnostic catalog (the static
set register_default_diags MAY register — some entries are
gated, see canonical_diag_gate_hint). Bounds for
canonical_diag_catalog_name’s index argument. Public for the
P7 discoverability C ABI (rdb_ocean_canonical_catalog_size)
and the unit-test suite.
pure function canonical_diag_catalog_size() result(n) !! Number of names in the canonical-diagnostic catalog (the static !! set `register_default_diags` MAY register — some entries are !! gated, see `canonical_diag_gate_hint`). Bounds for !! `canonical_diag_catalog_name`'s index argument. Public for the !! P7 discoverability C ABI (`rdb_ocean_canonical_catalog_size`) !! and the unit-test suite. integer :: n n = N_CANONICAL_DIAGS end function canonical_diag_catalog_size