How to use a While-Loop in VHDL

entity TO1_HelloWorldTb is
end entity;

architecture sim of TO1_HelloWorldTb is
begin

process is
variable i: integer :=0;
begin

while i<10 loop
report "i=" & integer 'image(i);
i:=i+1;
end loop;
wait;



end process;

end architecture;