Source position: googlecompute.pp line 1928
protected procedure TForwardingRulesScopedList.Setwarning(
AIndex: Integer;
const AValue: TForwardingRulesScopedListTypewarning
); virtual;