mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 01:09:31 +02:00
d908dbeec1
compiler/scanner.pas, tscannerfile.readtoken: * after trying to read a _INTCONST check whether a valid first character for an identifier follows and give a syntax error if that is not the case + added test git-svn-id: trunk@25835 -
10 lines
82 B
ObjectPascal
10 lines
82 B
ObjectPascal
{ %FAIL }
|
|
|
|
program tw25215;
|
|
var
|
|
&:integer;
|
|
begin
|
|
writeln(&);
|
|
//readln;
|
|
end.
|