paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-06-01 16:22:47 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ new target_os field: maxCstructalignment

Browse Source
This commit is contained in:
pierre 2000-06-23 21:31:18 +00:00
parent 20ac6d0b1e
commit 6e78b071f7
1 changed files with 20 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
compiler/systems.pas
View File

@ -153,7 +153,9 @@ unit systems;
Cprefix : string[2];
newline : string[2];
endian : tendian;
stackalignment : {longint this is a little overkill no ?? }byte;
{longint this is a little overkill no ?? but 256 is possible one day }
stackalignment : word;
maxCrecordalignment : word;
size_of_pointer : byte;
size_of_longint : byte;
use_bound_instruction : boolean;
@ -267,6 +269,7 @@ implementation
newline : #13#10;
endian : endian_little;
stackalignment : 2;
maxCrecordalignment : 4;
size_of_pointer : 4;
size_of_longint : 4;
use_bound_instruction : false;
@ -288,6 +291,7 @@ implementation
newline : #13#10;
endian : endian_little;
stackalignment : 2;
maxCrecordalignment : 4;
size_of_pointer : 4;
size_of_longint : 4;
use_bound_instruction : false;
@ -309,6 +313,7 @@ implementation
newline : #10;
endian : endian_little;
stackalignment : 4;
maxCrecordalignment : 4;
size_of_pointer : 4;
size_of_longint : 4;
use_bound_instruction : false;
@ -330,6 +335,7 @@ implementation
newline : #13#10;
endian : endian_little;
stackalignment : 2;
maxCrecordalignment : 4;
size_of_pointer : 4;
size_of_longint : 4;
use_bound_instruction : false;
@ -351,6 +357,7 @@ implementation
newline : #13#10;
endian : endian_little;
stackalignment : 4;
maxCrecordalignment : 16;
size_of_pointer : 4;
size_of_longint : 4;
use_bound_instruction : false;
@ -372,6 +379,7 @@ implementation
newline : #10;
endian : endian_big;
stackalignment : 2;
maxCrecordalignment : 4;
size_of_pointer : 4;
size_of_longint : 4;
use_bound_instruction : false;
@ -393,6 +401,7 @@ implementation
newline : #10;
endian : endian_big;
stackalignment : 2;
maxCrecordalignment : 4;
size_of_pointer : 4;
size_of_longint : 4;
use_bound_instruction : false;
@ -414,6 +423,7 @@ implementation
newline : #13;
endian : endian_big;
stackalignment : 2;
maxCrecordalignment : 4;
size_of_pointer : 4;
size_of_longint : 4;
use_bound_instruction : false;
@ -435,6 +445,7 @@ implementation
newline : #10;
endian : endian_big;
stackalignment : 2;
maxCrecordalignment : 32;
size_of_pointer : 4;
size_of_longint : 4;
use_bound_instruction : false;
@ -456,6 +467,7 @@ implementation
newline : #10;
endian : endian_big;
stackalignment : 2;
maxCrecordalignment : 32;
size_of_pointer : 4;
size_of_longint : 4;
use_bound_instruction : false;
@ -477,6 +489,7 @@ implementation
newline : #10;
endian : endian_little;
stackalignment : 8;
maxCrecordalignment : 32;
size_of_pointer : 8;
size_of_longint : 4;
use_bound_instruction : false;
@ -498,6 +511,7 @@ implementation
newline : #10;
endian : endian_big;
stackalignment : 8;
maxCrecordalignment : 32;
size_of_pointer : 4;
size_of_longint : 4;
use_bound_instruction : false;
@ -519,6 +533,7 @@ implementation
newline : #13;
endian : endian_big;
stackalignment : 8;
maxCrecordalignment : 32;
size_of_pointer : 4;
size_of_longint : 4;
use_bound_instruction : false;
@ -1623,7 +1638,10 @@ begin
end.
{
$Log$
Revision 1.104 2000-05-23 21:26:52 pierre
Revision 1.105 2000-06-23 21:31:18 pierre
+ new target_os field: maxCstructalignment
Revision 1.104 2000/05/23 21:26:52 pierre
+ added supported_target fiedl to tasminfo record
to disregard wrong assembler settings