mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-16 01:39:27 +02:00
* initialization of targets fixed
This commit is contained in:
parent
90bb204b89
commit
e759cda9e6
@ -931,7 +931,7 @@ begin
|
||||
{ better, we've a correct target list without "tilded" names instead a wrong one }
|
||||
for t:=low(tsystem) to high(tsystem) do
|
||||
if assigned(targetinfos[t]) then
|
||||
AddSelectItem(targetinfos[t]^.name,targetinfos[t]^.shortname,idNone);
|
||||
AddSelectItem(targetinfos[t]^.name, LowerCaseStr (targetinfos[t]^.shortname),idNone);
|
||||
end;
|
||||
New(AsmReaderSwitches,InitSelect('R'));
|
||||
with AsmReaderSwitches^ do
|
||||
@ -1212,7 +1212,10 @@ end;
|
||||
end.
|
||||
{
|
||||
$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
|
||||
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user