mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-22 19:29:24 +02:00
* tprocinfoflag moved to globtype
This commit is contained in:
parent
0ce74fb1bc
commit
b6e86be8de
@ -172,6 +172,26 @@ interface
|
||||
);
|
||||
tproccalloptions = set of tproccalloption;
|
||||
|
||||
tprocinfoflag=(
|
||||
{ procedure uses asm }
|
||||
pi_uses_asm,
|
||||
{ procedure does a call }
|
||||
pi_do_call,
|
||||
{ procedure has a try statement = no register optimization }
|
||||
pi_uses_exceptions,
|
||||
{ procedure is declared as @var(assembler), don't optimize}
|
||||
pi_is_assembler,
|
||||
{ procedure contains data which needs to be finalized }
|
||||
pi_needs_implicit_finally,
|
||||
{ procedure has the implicit try..finally generated }
|
||||
pi_has_implicit_finally,
|
||||
{ procedure uses fpu}
|
||||
pi_uses_fpu,
|
||||
{ procedure uses GOT for PIC code }
|
||||
pi_needs_got
|
||||
);
|
||||
tprocinfoflags=set of tprocinfoflag;
|
||||
|
||||
{$ifdef ansistring_bits}
|
||||
Tstringbits=(sb_16,sb_32,sb_64);
|
||||
{$endif}
|
||||
@ -247,7 +267,10 @@ implementation
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.54 2004-05-02 11:48:46 peter
|
||||
Revision 1.55 2004-05-23 14:32:17 peter
|
||||
* tprocinfoflag moved to globtype
|
||||
|
||||
Revision 1.54 2004/05/02 11:48:46 peter
|
||||
* strlenint is replaced with sizeint
|
||||
|
||||
Revision 1.53 2004/04/29 19:56:36 daniel
|
||||
|
@ -345,23 +345,6 @@ type
|
||||
te_exact
|
||||
);
|
||||
|
||||
tprocinfoflag=(
|
||||
{# procedure uses asm }
|
||||
pi_uses_asm,
|
||||
{# procedure does a call }
|
||||
pi_do_call,
|
||||
{# procedure has a try statement = no register optimization }
|
||||
pi_uses_exceptions,
|
||||
{# procedure is declared as @var(assembler), don't optimize}
|
||||
pi_is_assembler,
|
||||
{# procedure contains data which needs to be finalized }
|
||||
pi_needs_implicit_finally,
|
||||
{# procedure uses fpu}
|
||||
pi_uses_fpu,
|
||||
pi_needs_got
|
||||
);
|
||||
tprocinfoflags=set of tprocinfoflag;
|
||||
|
||||
{$ifdef GDB}
|
||||
type
|
||||
tdefstabstatus = (
|
||||
@ -424,7 +407,10 @@ initialization
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.81 2004-04-29 19:56:37 daniel
|
||||
Revision 1.82 2004-05-23 14:32:17 peter
|
||||
* tprocinfoflag moved to globtype
|
||||
|
||||
Revision 1.81 2004/04/29 19:56:37 daniel
|
||||
* Prepare compiler infrastructure for multiple ansistring types
|
||||
|
||||
Revision 1.80 2004/04/28 15:19:03 florian
|
||||
|
Loading…
Reference in New Issue
Block a user