Skip to content

Commit

Permalink
Added gcc wrapper for wince
Browse files Browse the repository at this point in the history
  • Loading branch information
LongDirtyAnimAlf committed Jun 22, 2018
1 parent a43bddd commit cd82b25
Show file tree
Hide file tree
Showing 8 changed files with 515 additions and 10 deletions.
1 change: 1 addition & 0 deletions fpcupdeluxe.lpr
Original file line number Diff line number Diff line change
Expand Up @@ -52,6 +52,7 @@
m_any_to_androidmipsel,
m_any_to_androidjvm,
m_any_to_androidaarch64, //not yet available !!
m_any_to_androidx64, //not yet available !!
m_any_to_linuxarm,
m_any_to_linuxmips,
m_any_to_linuxmipsel,
Expand Down
9 changes: 5 additions & 4 deletions fpcupdeluxemainform.lfm
Original file line number Diff line number Diff line change
Expand Up @@ -1507,11 +1507,11 @@ object Form1: TForm1
OnSpecialLineMarkup = SynEdit1SpecialLineMarkup
inline SynLeftGutterPartList1: TSynGutterPartList
object SynGutterMarks1: TSynGutterMarks
Width = 24
Width = 0
MouseActions = <>
end
object SynGutterLineNumber1: TSynGutterLineNumber
Width = 15
Width = 0
MouseActions = <>
MarkupInfo.Background = clBtnFace
MarkupInfo.Foreground = clNone
Expand All @@ -1521,18 +1521,19 @@ object Form1: TForm1
LeadingZeros = False
end
object SynGutterChanges1: TSynGutterChanges
Width = 4
Width = 0
MouseActions = <>
ModifiedColor = 59900
SavedColor = clGreen
end
object SynGutterSeparator1: TSynGutterSeparator
Width = 2
Width = 0
MouseActions = <>
MarkupInfo.Background = clWhite
MarkupInfo.Foreground = clGray
end
object SynGutterCodeFolding1: TSynGutterCodeFolding
Width = 0
MouseActions = <>
MarkupInfo.Background = clNone
MarkupInfo.Foreground = clGray
Expand Down
2 changes: 1 addition & 1 deletion fpcupdeluxemainform.pas
Original file line number Diff line number Diff line change
Expand Up @@ -1517,7 +1517,7 @@ function TForm1.InstallCrossCompiler(Sender: TObject):boolean;
if radgrpCPU.ItemIndex<>-1 then
begin
s:=radgrpCPU.Items[radgrpCPU.ItemIndex];
if (s<>'i386') and (s<>'arm') and (s<>'mipsel') and (s<>'jvm') then
if (s<>'i386') and (s<>'arm') and (s<>'mipsel') and (s<>'jvm') {and (s<>'x8664') and (s<>'x86_64') and (s<>'aarch64')} then
begin
success:=false;
end;
Expand Down
70 changes: 70 additions & 0 deletions gcc.lpi
Original file line number Diff line number Diff line change
@@ -0,0 +1,70 @@
<?xml version="1.0" encoding="UTF-8"?>
<CONFIG>
<ProjectOptions>
<Version Value="11"/>
<PathDelim Value="\"/>
<General>
<Flags>
<MainUnitHasCreateFormStatements Value="False"/>
<MainUnitHasTitleStatement Value="False"/>
<MainUnitHasScaledStatement Value="False"/>
</Flags>
<SessionStorage Value="InProjectDir"/>
<MainUnit Value="0"/>
<Title Value="gcc"/>
<UseAppBundle Value="False"/>
<ResourceType Value="res"/>
</General>
<BuildModes Count="1">
<Item1 Name="Default" Default="True"/>
</BuildModes>
<PublishOptions>
<Version Value="2"/>
</PublishOptions>
<RunParams>
<FormatVersion Value="2"/>
<Modes Count="0"/>
</RunParams>
<Units Count="1">
<Unit0>
<Filename Value="gcc.lpr"/>
<IsPartOfProject Value="True"/>
</Unit0>
</Units>
</ProjectOptions>
<CompilerOptions>
<Version Value="11"/>
<PathDelim Value="\"/>
<Target>
<Filename Value="gcc"/>
</Target>
<SearchPaths>
<IncludeFiles Value="$(ProjOutDir)"/>
<UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/>
</SearchPaths>
<CodeGeneration>
<Optimizations>
<OptimizationLevel Value="3"/>
</Optimizations>
</CodeGeneration>
<Linking>
<Debugging>
<GenerateDebugInfo Value="False"/>
<StripSymbols Value="True"/>
</Debugging>
</Linking>
</CompilerOptions>
<Debugging>
<Exceptions Count="3">
<Item1>
<Name Value="EAbort"/>
</Item1>
<Item2>
<Name Value="ECodetoolError"/>
</Item2>
<Item3>
<Name Value="EFOpenError"/>
</Item3>
</Exceptions>
</Debugging>
</CONFIG>
14 changes: 14 additions & 0 deletions gcc.lpr
Original file line number Diff line number Diff line change
@@ -0,0 +1,14 @@
program gcc;
uses
Classes, SysUtils, Process;
var
i: integer;
AProcess: TProcess;
begin
AProcess:=TProcess.Create(nil);
APRocess.Executable:=ExtractFilePath(ParamStr(0))+'gcc\gcc.exe';
for i:=1 to ParamCount() do APRocess.Parameters.Append(ParamStr(i));
AProcess.Execute;
AProcess.Free;
end.

1 change: 1 addition & 0 deletions installercore.pas
Original file line number Diff line number Diff line change
Expand Up @@ -45,6 +45,7 @@ interface
BINUTILSURL = FPCSVNURL + '/fpcbuild';
//FPC prebuilt binaries of the GNU Binutils
PREBUILTBINUTILSURL = BINUTILSURL + '/binaries/i386-win32';
PREBUILTBINUTILSURLWINCE = BINUTILSURL + '/tags/release_3_0_4/install/crossbinwce';
{$ENDIF}

CHM_URL_LATEST_SVN = FPCSVNURL + '/lazarus/binaries/docs/chm';
Expand Down
Loading

0 comments on commit cd82b25

Please sign in to comment.