Source position: googlecompute.pp line 681
protected procedure TAddressesScopedList.Setwarning(
AIndex: Integer;
const AValue: TAddressesScopedListTypewarning
); virtual;