[fpc-pascal] AbstractError in 3.1.1

[Ryan Joseph]

> On Oct 12, 2017, at 5:35 PM, Michael Van Canneyt <michael at freepascal.org> wrote:
> 
> Normally not :)
> 
> What Sven wanted to ascertain was why you get this error, which is totally abnormal.

Ok did some tests and here’s an example of how to reproduce it. It’s the name “system” which is doing it and if I remove that name the error goes away.

type
	TAbstractClass = class
		function GetLocation (system: TObject): TPoint; virtual; abstract;
	end;

Regards,
	Ryan Joseph