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

* cosmetics

Browse Source
This commit is contained in:
florian 2021-11-07 14:46:03 +01:00
parent f570b6cb7b
commit c917639b91
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/options.pas
View File

@ -1623,7 +1623,7 @@ begin
Str(cf,cpuflagsstr);
{ expect that the cpuflagsstr i.e. the enum as well contains _HAS_ }
if Pos('_HAS_',cpuflagsstr)<>0 then
{ get rid of prefix include _HAS_ }
{ get rid of prefix including _HAS_ }
Delete(cpuflagsstr,1,Pos('_HAS_',cpuflagsstr)+4)
else
Internalerror(2021110601);