absolute
 and
 array
 asm
 begin
 break
 case
 const
 constructor
 continue
 destructor
 div                  do
  downto
  else
  end
  file
  for
  function
  goto
  if
  implementation
  in
  inherited
  inline
  interface
  label
  mod                  nil
  not
  object
  of
  on
  operator
  or
  packed
  procedure
  program
  record
  repeat
  self
  set
  shl
  shr                  string
  then
  to
  type
  unit
  until
  uses
  var
  while
  with
  xor