Wow, this parses in Delphi: `property Foo: string index 0 string read GetFoo;`

Quite a few interesting entries got posted after I published this compiler glitch:

Wow, this parses:

property Foo: string index 0 string read GetFoo;

Note the extra “string”.

Found this in an old piece of code so it must have been uncaught by the compiler for quite a while.

– Jeroen Wiert Pluimers – Google+

Some:

property DepartmentName: string index 0 program library uses unit interface string class read GetCustomDataX;

property Foo: string index 0 unit if library uses unit do not inline file else raise object if is nil read GetFoo;

–jeroen