|
@@ -104,7 +104,9 @@ interface
|
|
type
|
|
type
|
|
tcodepagestring = string[20];
|
|
tcodepagestring = string[20];
|
|
|
|
|
|
|
|
+ { this is written to ppus during token recording for generics so it must be packed }
|
|
tsettings = packed record
|
|
tsettings = packed record
|
|
|
|
+ alignment : talignmentinfo;
|
|
globalswitches : tglobalswitches;
|
|
globalswitches : tglobalswitches;
|
|
moduleswitches : tmoduleswitches;
|
|
moduleswitches : tmoduleswitches;
|
|
localswitches : tlocalswitches;
|
|
localswitches : tlocalswitches;
|
|
@@ -119,7 +121,10 @@ interface
|
|
>0: round to this size }
|
|
>0: round to this size }
|
|
setalloc,
|
|
setalloc,
|
|
packenum : shortint;
|
|
packenum : shortint;
|
|
- alignment : talignmentinfo;
|
|
|
|
|
|
+
|
|
|
|
+ packrecords : shortint;
|
|
|
|
+ maxfpuregisters : shortint;
|
|
|
|
+
|
|
cputype,
|
|
cputype,
|
|
optimizecputype : tcputype;
|
|
optimizecputype : tcputype;
|
|
fputype : tfputype;
|
|
fputype : tfputype;
|
|
@@ -128,9 +133,6 @@ interface
|
|
defproccall : tproccalloption;
|
|
defproccall : tproccalloption;
|
|
sourcecodepage : tcodepagestring;
|
|
sourcecodepage : tcodepagestring;
|
|
|
|
|
|
- packrecords : shortint;
|
|
|
|
- maxfpuregisters : shortint;
|
|
|
|
-
|
|
|
|
minfpconstprec : tfloattype;
|
|
minfpconstprec : tfloattype;
|
|
|
|
|
|
disabledircache : boolean;
|
|
disabledircache : boolean;
|
|
@@ -330,16 +332,6 @@ interface
|
|
|
|
|
|
const
|
|
const
|
|
default_settings : TSettings = (
|
|
default_settings : TSettings = (
|
|
- globalswitches : [cs_check_unit_name,cs_link_static];
|
|
|
|
- moduleswitches : [cs_extsyntax,cs_implicit_exceptions];
|
|
|
|
- localswitches : [cs_check_io,cs_typed_const_writable];
|
|
|
|
- modeswitches : fpcmodeswitches;
|
|
|
|
- optimizerswitches : [];
|
|
|
|
- genwpoptimizerswitches : [];
|
|
|
|
- dowpoptimizerswitches : [];
|
|
|
|
- debugswitches : [];
|
|
|
|
- setalloc : 0;
|
|
|
|
- packenum : 4;
|
|
|
|
alignment : (
|
|
alignment : (
|
|
procalign : 0;
|
|
procalign : 0;
|
|
loopalign : 0;
|
|
loopalign : 0;
|
|
@@ -354,6 +346,21 @@ interface
|
|
recordalignmax : 0;
|
|
recordalignmax : 0;
|
|
maxCrecordalign : 0;
|
|
maxCrecordalign : 0;
|
|
);
|
|
);
|
|
|
|
+ globalswitches : [cs_check_unit_name,cs_link_static];
|
|
|
|
+ moduleswitches : [cs_extsyntax,cs_implicit_exceptions];
|
|
|
|
+ localswitches : [cs_check_io,cs_typed_const_writable];
|
|
|
|
+ modeswitches : fpcmodeswitches;
|
|
|
|
+ optimizerswitches : [];
|
|
|
|
+ genwpoptimizerswitches : [];
|
|
|
|
+ dowpoptimizerswitches : [];
|
|
|
|
+ debugswitches : [];
|
|
|
|
+
|
|
|
|
+ setalloc : 0;
|
|
|
|
+ packenum : 4;
|
|
|
|
+
|
|
|
|
+ packrecords : 0;
|
|
|
|
+ maxfpuregisters : 0;
|
|
|
|
+
|
|
{$ifdef i386}
|
|
{$ifdef i386}
|
|
cputype : cpu_Pentium;
|
|
cputype : cpu_Pentium;
|
|
optimizecputype : cpu_Pentium3;
|
|
optimizecputype : cpu_Pentium3;
|
|
@@ -398,9 +405,9 @@ interface
|
|
interfacetype : it_interfacecom;
|
|
interfacetype : it_interfacecom;
|
|
defproccall : pocall_default;
|
|
defproccall : pocall_default;
|
|
sourcecodepage : '8859-1';
|
|
sourcecodepage : '8859-1';
|
|
- packrecords : 0;
|
|
|
|
- maxfpuregisters : 0;
|
|
|
|
minfpconstprec : s32real;
|
|
minfpconstprec : s32real;
|
|
|
|
+
|
|
|
|
+ disabledircache : false;
|
|
{$if defined(ARM)}
|
|
{$if defined(ARM)}
|
|
controllertype : ct_none;
|
|
controllertype : ct_none;
|
|
{$endif defined(ARM)}
|
|
{$endif defined(ARM)}
|