Accept STORED keyword as identifier

[fabriciocolombo]

The following code causes a parser error because STORED was treated as a keyword.

unit KeyWordsAsIdentifier;

interface

implementation

var
  Stored: Boolean;

end.