Source position: lazglib2.pas line 3425
type TGScannerMsgFunc = procedure(
scanner: PGScanner;
message: Pgchar;
error: gboolean
);