瀏覽代碼

Remove unused variables.

git-svn-id: file:///var/svn/tigccpp/trunk/tigcc/ide@901 9552661e-59e3-4036-b4f2-dbe53926924f
kevinkofler 17 年之前
父節點
當前提交
e495f38452
共有 1 個文件被更改,包括 0 次插入2 次删除
  1. 0 2
      MainUnit.pas

+ 0 - 2
MainUnit.pas

@@ -4683,7 +4683,6 @@ end;
 
 function TMainForm.GetTiEmuInterface: ITiEmuOLE;
 var
-	ExitCode: Cardinal;
 	Unknown: IUnknown;
 	OLEResult: HResult;
 begin
@@ -4872,7 +4871,6 @@ end;
 procedure TMainForm.ExecuteCommandLine(const Line: string);
 var
 	TiEmuInterface: ITiEmuOLE;
-	I: Integer;
 	Connection: TLinkConnection;
 begin
 	if TransferTarget = ttVTI then begin