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

add support for gdmd as a compiler for CE projects

This commit is contained in:
Basile Burg 2016-03-27 06:41:00 +02:00
parent c5a51539c2
commit 687191c32e
2 changed files with 1 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/ce_main.pas
View File

@ -378,7 +378,6 @@ type
TCEApplicationOptionsBase = class(TWritableLfmTextComponent) TCEApplicationOptionsBase = class(TWritableLfmTextComponent)
private private
fNoGdcWarn: boolean;
fFloatingWidgetOnTop: boolean; fFloatingWidgetOnTop: boolean;
fReloadLastDocuments: boolean; fReloadLastDocuments: boolean;
fCovModUt: boolean; fCovModUt: boolean;
@ -455,13 +454,6 @@ end;
procedure TCEApplicationOptionsBase.setNativeProjecCompiler(value: TCECompiler); procedure TCEApplicationOptionsBase.setNativeProjecCompiler(value: TCECompiler);
begin begin
if value = gdc then
begin
value := dmd;
if not fNoGdcWarn then
dlgOkInfo('Coedit native projects can not be compiled with GDC');
fNoGdcWarn := true;
end;
ce_nativeproject.setNativeProjectCompiler(value); ce_nativeproject.setNativeProjectCompiler(value);
end; end;

2
src/ce_nativeproject.pas
View File

@ -1040,7 +1040,7 @@ procedure setNativeProjectCompiler(value: TCECompiler);
begin begin
case value of case value of
dmd: NativeProjectCompilerFilename := exeFullName('dmd' + exeExt); dmd: NativeProjectCompilerFilename := exeFullName('dmd' + exeExt);
gdc: NativeProjectCompilerFilename := exeFullName('cegdcldc' + exeExt); gdc: NativeProjectCompilerFilename := exeFullName('gdmd' + exeExt);
ldc: NativeProjectCompilerFilename := exeFullName('ldmd2' + exeExt); ldc: NativeProjectCompilerFilename := exeFullName('ldmd2' + exeExt);
end; end;
if (not NativeProjectCompilerFilename.fileExists) if (not NativeProjectCompilerFilename.fileExists)