package p is
  constant c : natural := 1;

  --  Comment
  type state_t is (s1, s2, s3);
end p;