paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-02 17:10:34 +02:00
Code Issues Packages Projects Releases Wiki Activity

* initialization of targets fixed

Browse Source
This commit is contained in:
Tomas Hajny 2005-05-15 19:22:13 +00:00
parent 90bb204b89
commit e759cda9e6
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ide/fpswitch.pas
View File

@ -931,7 +931,7 @@ begin
{ better, we've a correct target list without "tilded" names instead a wrong one } { better, we've a correct target list without "tilded" names instead a wrong one }
for t:=low(tsystem) to high(tsystem) do for t:=low(tsystem) to high(tsystem) do
if assigned(targetinfos[t]) then if assigned(targetinfos[t]) then
AddSelectItem(targetinfos[t]^.name,targetinfos[t]^.shortname,idNone); AddSelectItem(targetinfos[t]^.name, LowerCaseStr (targetinfos[t]^.shortname),idNone);
end; end;
New(AsmReaderSwitches,InitSelect('R')); New(AsmReaderSwitches,InitSelect('R'));
with AsmReaderSwitches^ do with AsmReaderSwitches^ do
@ -1212,7 +1212,10 @@ end;
end. end.
{ {
$Log$ $Log$
Revision 1.22 2005-02-14 17:13:18 peter Revision 1.23 2005-05-15 19:22:13 hajny
* initialization of targets fixed
Revision 1.22 2005/02/14 17:13:18 peter
* truncate log * truncate log
} }