Source position: pas_generator.pas line 178
protected procedure TCustomPasGenerator.SetPreferedShortNames(
const ALongName: string;
const AShortName: string
);