program prgc; {$APPTYPE CONSOLE} {$R *.res} uses System.SysUtils, main in '..\..\src.prgc\main.pas', prgLexer in '..\..\src.prgc\grammar\prgLexer.pas', prgLexerTokens in '..\..\src.prgc\grammar\prgLexerTokens.pas', prgParser in '..\..\src.prgc\grammar\prgParser.pas', prgParserTokens in '..\..\src.prgc\grammar\prgParserTokens.pas'; begin var cmd := ''; for var i:=1 to ParamCount do cmd := cmd + ParamStr(i); with TcmdMain.Create do begin Execute( 'prgc.exe', cmd); Free end end.