PParser fails on an interface with type TAuto<T: class> = record

Summary

PParser fails on an interface with type TAuto<T: class> = record

System Information

• Operating system: Linux, Arch Linux
• Processor architecture: x86-64
• Compiler version: 3.3.1-11938-g88cf633b
• Device: Computer

Steps to reproduce

See attached program. lazforum-60775.tar.gz

make clean
make x_parse_pas0

Got:

+ /home/shared-development/lazforum/60775/bin/parse_pas smartptrs.pas
An unhandled exception occurred at $0000000000461E52:
EParserError: Expected "=" at token "<" in file smartptrs.pas at line 6 column 8
  $0000000000461E52
  $0000000000462033
  $00000000004027A7  main,  line 122 of parse_pas.pas
  $0000000000402BDE  $main,Goodbye TSimpleEngine
TObjectWrapC<T>.destroy
release ptr: 0000000000000000
  line 127 of parse_pas.pas

Example Project

What is the current bug behavior?

See steps to reproduce. PParser fails on an interface with type TAuto<T: class> = record

What is the expected (correct) behavior?

For PParser to parse the line in question...

And the program that uses that unit and PParser compiled and ran...

As the following works:

make clean
make x_parse_pas2