+ added po_far to tprocoptions

git-svn-id: trunk@24815 -

compiler/ppu.pas

@@ -43,7 +43,7 @@ type
 {$endif Test_Double_checksum}
 
 const
-  CurrentPPUVersion = 160;
+  CurrentPPUVersion = 161;
 
 { buffer sizes }
   maxentrysize = 1024;

compiler/symconst.pas

@@ -350,7 +350,9 @@ type
     { the visibility of of this procdef was raised automatically by the
       compiler, e.g. because it was designated as a getter/setter for a property
       with a higher visibility on the JVM target }
-    po_auto_raised_visibility
+    po_auto_raised_visibility,
+    { procedure is far (x86 only) }
+    po_far
   );
   tprocoptions=set of tprocoption;
 

compiler/utils/ppuutils/ppudump.pp

@@ -1723,7 +1723,8 @@ const
      (mask:po_java_nonvirtual; str: 'Java non-virtual method'),
      (mask:po_ignore_for_overload_resolution;str: 'Ignored for overload resolution'),
      (mask:po_rtlproc;         str: 'RTL procedure'),
-     (mask:po_auto_raised_visibility; str: 'Visibility raised by compiler')
+     (mask:po_auto_raised_visibility; str: 'Visibility raised by compiler'),
+     (mask:po_far;             str: 'Far')
   );
 var
   proctypeoption  : tproctypeoption;