how to delete begin end???

edited 8:10PM in FastScript
i write the fllowing script:
var
i:integer;

function getname:string
begin
result:='test';
end;

showmessage(getname);

procedure init;
begin
i:=100;
end;
init;
showmessage(vartostr(i));
you know i don't write "begin end." section. beacuse i think script could run anywhere.

who could tell how to modify PASCAL_GRAMMAR to implementate it??

Comments

Leave a Comment