[fpc-devel] new features and facilities

[Mohsen]

Hi!
I wanna add new features and facilities to pascal like while - else, for 
- else and inline if statement like python.

examples

ex1:

I:=5;
while(I>0) do
   begin
      Write(I);
      I:=I-1;
  end else Write(' While Else ');

ex1-output:54321 While Else

ex2:

I:=5;
   while(I>0) do
   begin
      Write(I);
      Break;
   end else Write(' While Else ');

ex2-output:5


so i want you to help me how to implement  it.

thanks a million.