fcl-passrc parser fails to parse "static" directive at class fields
Original Reporter info from Mantis: Michalis @michaliskambi
-
Reporter name: Michalis Kamburelis
Original Reporter info from Mantis: Michalis @michaliskambi
- Reporter name: Michalis Kamburelis
Description:
Parser from fcl-passrc fails to parse "static", like in this code:
TMyClass = class
OnCreate: Integer; static;
end;
FPC parses it Ok.
$ fpc -Mobjfpc static_in_class.pas
$ fpc test_passrc.lpr
$ ./test_passrc static_in_class.pas
An unhandled exception occurred at $0000000000474E75:
EParserError: Expected "," or ":" at token ";" in file static_in_class.pas at line 3 column 30
To reproduce: use my test program from http://wiki.freepascal.org/fcl-passrc (attached also to this bugreport for comfort:) and run it on static_in_class.pas .
Mantis conversion info:
- Mantis ID: 30696
- OS: Debian GNU/Linux
- OS Build: (testing)
- Build: from around 2016/08/20
- Platform: x86-64
- Version: 3.1.1
- Fixed in version: 3.1.1
- Fixed in revision: 34668 (#0437bc4c)
- Target version: 3.2.0