23.7.13 Direct_Calls_To_Primitives

Flags any non-dispatching call to a dispatching primitive operation, except
for the common idiom where a primitive subprogram for a tagged type
directly calls the same primitive subprogram of the type's immediate ancestor.