mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-17 07:39:27 +02:00
+ added po_far to tprocoptions
git-svn-id: trunk@24815 -
This commit is contained in:
parent
fcc84e5d96
commit
381c996e53
compiler
@ -43,7 +43,7 @@ type
|
||||
{$endif Test_Double_checksum}
|
||||
|
||||
const
|
||||
CurrentPPUVersion = 160;
|
||||
CurrentPPUVersion = 161;
|
||||
|
||||
{ buffer sizes }
|
||||
maxentrysize = 1024;
|
||||
|
@ -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;
|
||||
|
||||
|
@ -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;
|
||||
|
Loading…
Reference in New Issue
Block a user