From 687191c32ef614ada3e001e37ed73f92e03d5979 Mon Sep 17 00:00:00 2001 From: Basile Burg Date: Sun, 27 Mar 2016 06:41:00 +0200 Subject: [PATCH] add support for gdmd as a compiler for CE projects --- src/ce_main.pas | 8 -------- src/ce_nativeproject.pas | 2 +- 2 files changed, 1 insertion(+), 9 deletions(-) diff --git a/src/ce_main.pas b/src/ce_main.pas index da22853f..21cdc8ee 100644 --- a/src/ce_main.pas +++ b/src/ce_main.pas @@ -378,7 +378,6 @@ type TCEApplicationOptionsBase = class(TWritableLfmTextComponent) private - fNoGdcWarn: boolean; fFloatingWidgetOnTop: boolean; fReloadLastDocuments: boolean; fCovModUt: boolean; @@ -455,13 +454,6 @@ end; procedure TCEApplicationOptionsBase.setNativeProjecCompiler(value: TCECompiler); 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); end; diff --git a/src/ce_nativeproject.pas b/src/ce_nativeproject.pas index 60e76783..0c5c563b 100644 --- a/src/ce_nativeproject.pas +++ b/src/ce_nativeproject.pas @@ -1040,7 +1040,7 @@ procedure setNativeProjectCompiler(value: TCECompiler); begin case value of dmd: NativeProjectCompilerFilename := exeFullName('dmd' + exeExt); - gdc: NativeProjectCompilerFilename := exeFullName('cegdcldc' + exeExt); + gdc: NativeProjectCompilerFilename := exeFullName('gdmd' + exeExt); ldc: NativeProjectCompilerFilename := exeFullName('ldmd2' + exeExt); end; if (not NativeProjectCompilerFilename.fileExists)