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

add gdmd to the information box

This commit is contained in:
Basile Burg 2016-04-16 14:57:39 +02:00
parent b8aefcb761
commit 6810fe0b68
3 changed files with 16 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/ce_dmdwrap.pas
View File

@ -155,7 +155,7 @@ type
property versionIdentifiers: TStringList read fVerIds write setVerIds; property versionIdentifiers: TStringList read fVerIds write setVerIds;
property generateAllTmpCode: boolean read fAllInst write setAllInst default false; property generateAllTmpCode: boolean read fAllInst write setAllInst default false;
property addStackStompCode: boolean read fStackStomp write setStackStomp default false; property addStackStompCode: boolean read fStackStomp write setStackStomp default false;
//TODO-cmaintenace: remove deprecated props after next rlz //TODO-cmaintenace: remove deprecated props
property generateStackFrame: boolean write setGenStack stored false; deprecated; property generateStackFrame: boolean write setGenStack stored false; deprecated;
public public
constructor create; override; constructor create; override;
@ -192,7 +192,7 @@ type
property generateInfos: boolean read fGenInfos write setGenInfos default false; property generateInfos: boolean read fGenInfos write setGenInfos default false;
property generateMapFile: boolean read fGenMap write setGenMap default false; property generateMapFile: boolean read fGenMap write setGenMap default false;
property generateStackFrame: boolean read fGenFrame write setGenFrame default false; property generateStackFrame: boolean read fGenFrame write setGenFrame default false;
//TODO-cmaintenace: remove deprecated props after next rlz //TODO-cmaintenace: remove deprecated props
property debug: boolean write setDebugConditions; deprecated; property debug: boolean write setDebugConditions; deprecated;
property codeviewDexts: boolean write setGenInfos stored false; deprecated; property codeviewDexts: boolean write setGenInfos stored false; deprecated;
property codeviewCformat: boolean write setDbgC stored false; deprecated; property codeviewCformat: boolean write setDbgC stored false; deprecated;

18
src/ce_infos.lfm
View File

@ -1,21 +1,21 @@
inherited CEInfoWidget: TCEInfoWidget inherited CEInfoWidget: TCEInfoWidget
Left = 713 Left = 713
Height = 423 Height = 457
Top = 245 Top = 245
Width = 411 Width = 411
BorderIcons = [biSystemMenu, biMinimize, biMaximize] BorderIcons = [biSystemMenu, biMinimize, biMaximize]
Caption = 'About' Caption = 'About'
ClientHeight = 423 ClientHeight = 457
ClientWidth = 411 ClientWidth = 411
inherited Back: TPanel inherited Back: TPanel
Height = 423 Height = 457
Width = 411 Width = 411
ClientHeight = 423 ClientHeight = 457
ClientWidth = 411 ClientWidth = 411
inherited Content: TPanel inherited Content: TPanel
Height = 423 Height = 457
Width = 411 Width = 411
ClientHeight = 423 ClientHeight = 457
ClientWidth = 411 ClientWidth = 411
object GroupBox1: TGroupBox[0] object GroupBox1: TGroupBox[0]
Left = 4 Left = 4
@ -46,18 +46,18 @@ inherited CEInfoWidget: TCEInfoWidget
end end
object GroupBox2: TGroupBox[1] object GroupBox2: TGroupBox[1]
Left = 4 Left = 4
Height = 306 Height = 340
Top = 113 Top = 113
Width = 403 Width = 403
Align = alClient Align = alClient
BorderSpacing.Around = 4 BorderSpacing.Around = 4
Caption = 'tools status' Caption = 'tools status'
ClientHeight = 276 ClientHeight = 310
ClientWidth = 399 ClientWidth = 399
TabOrder = 1 TabOrder = 1
object boxTools: TScrollBox object boxTools: TScrollBox
Left = 4 Left = 4
Height = 268 Height = 302
Top = 4 Top = 4
Width = 391 Width = 391
HorzScrollBar.Page = 1 HorzScrollBar.Page = 1

5
src/ce_infos.pas
View File

@ -180,6 +180,11 @@ begin
'optional, the D source code formater, needed by the Dfmt commander widget'); 'optional, the D source code formater, needed by the Dfmt commander widget');
toolItem.Parent := boxTools; toolItem.Parent := boxTools;
toolItem.ReAlign; toolItem.ReAlign;
// TODO-cmaintenance: remove this entry if GDMD is distributed with GDC
toolItem := TToolInfo.Construct(self, tikOptional, 'gdmd',
'optional, the GDC wrapper with a DMD command line interface');
toolItem.Parent := boxTools;
toolItem.ReAlign;
toolItem := TToolInfo.Construct(self, tikOptional, 'gdc', toolItem := TToolInfo.Construct(self, tikOptional, 'gdc',
'optional, the GDC D compiler'); 'optional, the GDC D compiler');
toolItem.Parent := boxTools; toolItem.Parent := boxTools;