program interpreter; {$mode delphi} uses Execute, Source, Parser; var ProgramCode: TProgramCode; begin WriteLn('Parsing started'); ParseProgram(@ProgramCode); WriteLn('Parsing finished'); WriteLn('Execution started'); ExecuteProgram(@ProgramCode); WriteLn('Execution finished'); end.