Source position: lazglib2.pas line 5637
procedure g_source_set_name(
source: PGSource;
name: Pgchar
);