mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-23 02:29:34 +02:00
* use new illegal_char method
This commit is contained in:
parent
efa4fa2ce4
commit
6fa1a1bae0
@ -732,9 +732,7 @@ begin
|
||||
end;
|
||||
|
||||
else
|
||||
Begin
|
||||
Message(scan_f_illegal_char);
|
||||
end;
|
||||
current_scanner^.illegal_char(c);
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
@ -2099,7 +2097,10 @@ begin
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.83 2000-06-15 18:07:07 peter
|
||||
Revision 1.84 2000-06-18 18:07:06 peter
|
||||
* use new illegal_char method
|
||||
|
||||
Revision 1.83 2000/06/15 18:07:07 peter
|
||||
* fix constant parsing which gave an error when constants were used
|
||||
|
||||
Revision 1.82 2000/06/14 19:02:41 peter
|
||||
|
@ -622,9 +622,7 @@ begin
|
||||
end;
|
||||
|
||||
else
|
||||
Begin
|
||||
Message(scan_f_illegal_char);
|
||||
end;
|
||||
current_scanner^.illegal_char(c);
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
@ -1899,7 +1897,10 @@ begin
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.74 2000-06-15 18:07:08 peter
|
||||
Revision 1.75 2000-06-18 18:07:06 peter
|
||||
* use new illegal_char method
|
||||
|
||||
Revision 1.74 2000/06/15 18:07:08 peter
|
||||
* fix constant parsing which gave an error when constants were used
|
||||
|
||||
Revision 1.73 2000/06/14 19:02:41 peter
|
||||
|
Loading…
Reference in New Issue
Block a user