forks
/
dexed
mirror of https://gitlab.com/basile.b/dexed.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

native projects, compiler ldc, uses directly ldmd2

This commit is contained in:
Basile Burg 2015-12-11 12:24:37 +01:00
parent 87f8385f50
commit d23460909d
1 changed files with 4 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/ce_nativeproject.pas
View File

@ -728,12 +728,10 @@ begin
compilproc.ShowWindow := swoHIDE;
getOpts(compilproc.Parameters);
compilproc.Execute;
if NativeProjectCompiler <> dmd then
if NativeProjectCompiler = gdc then
begin
case NativeProjectCompiler of
gdc: begin str := 'gdc'; compilproc.Input.Write(str[1], 3) end;
ldc: begin str := 'ldc2'; compilproc.Input.Write(str[1], 4) end;
end;
str := 'gdc';
compilproc.Input.Write(str[1], 3);
compilproc.CloseInput;
end;
while compilProc.Running do
@ -988,7 +986,7 @@ begin
case value of
dmd: NativeProjectCompilerFilename := exeFullName('dmd' + exeExt);
gdc: NativeProjectCompilerFilename := exeFullName('cegdcldc' + exeExt);
ldc: NativeProjectCompilerFilename := exeFullName('cegdcldc' + exeExt);
ldc: NativeProjectCompilerFilename := exeFullName('ldmd2' + exeExt);
end;
if (not fileExists(NativeProjectCompilerFilename))
or (NativeProjectCompilerFilename = '') then