From 3ebfdf688593001cdd359d7b374d289a9dcfdbb2 Mon Sep 17 00:00:00 2001 From: Erich Eckner Date: Mon, 26 Oct 2015 15:17:48 +0100 Subject: Argumente aus IDE in gitupdateunit.pas übernommen MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- gitupdateunit.pas | 23 +++++++++++++++++------ 1 file changed, 17 insertions(+), 6 deletions(-) diff --git a/gitupdateunit.pas b/gitupdateunit.pas index 37d3409..94e0263 100644 --- a/gitupdateunit.pas +++ b/gitupdateunit.pas @@ -34,16 +34,27 @@ initialization if runCommandInDir(baseDir+'units','/usr/bin/git',args,output) then begin updated:=updated or (output<>'Already up-to-date.'#10); if updated then begin - setlength(args,4); - args[0]:='-Fu../units'; - args[1]:='-Mobjpas'; + setlength(args,15); + args[0]:='-MObjFPC'; + args[1]:='-Scghi'; + args[2]:='-Cg'; + args[3]:='-CirotR'; + args[4]:='-O1'; + args[5]:='-g'; + args[6]:='-gl'; + args[7]:='-l'; + args[8]:='-vewnhibq'; + args[9]:='-Filib/x86_64-linux'; + args[10]:='-Fu../units'; + args[11]:='-Fu.'; + args[12]:='-FUlib/x86_64-linux'; tmpFile:=myDir+extractFileName(paramstr(0)); if fileexists(tmpFile+'.lpr') then - args[2]:=tmpFile+'.lpr' + args[13]:=tmpFile+'.lpr' else - args[2]:=tmpFile+'.pas'; + args[13]:=tmpFile+'.pas'; tmpFile:=mkTemp('/tmp/fpc.XXXXXX'); - args[3]:='-o'+tmpFile; + args[14]:='-o'+tmpFile; if runCommandInDir(myDir,'/usr/bin/fpc',args,output) then begin setlength(args,2); args[0]:=tmpFile; -- cgit v1.2.3-70-g09d2