* Merging revisions r46288 from trunk:

    ------------------------------------------------------------------------
    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 -

packages/fcl-passrc/src/paswrite.pp

@@ -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);