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

* Merging revisions r46288 from trunk:

Browse Source 
------------------------------------------------------------------------
    r46288 | michael | 2020-08-06 15:09:17 +0200 (Thu, 06 Aug 2020) | 1 line
    
    * No $NOTES for Delphi
    ------------------------------------------------------------------------

git-svn-id: branches/fixes_3_2@46610 -
This commit is contained in:
michael 2020-08-23 09:31:08 +00:00
parent ef2b7d9f99
commit d3b8571d22
1 changed files with 2 additions and 0 deletions

2
packages/fcl-passrc/src/paswrite.pp
View File

@ -322,7 +322,9 @@ begin
begin
Addln('{$HINTS OFF}');
Addln('{$WARNINGS OFF}');
Addln('{$IFDEF FPC}');
Addln('{$NOTES OFF}');
Addln('{$ENDIF FPC}');
end;
if Assigned(aModule.ProgramSection) then
WriteSection(aModule.ProgramSection);