Source position: pscanner.pp line 989
public procedure TPascalScanner.SetCompilerMode(
S: TPasScannerString
);