mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-15 01:29:19 +02:00
* moved creation of voidpointertype, so that voidpointertype.size is available
earlier git-svn-id: trunk@26951 -
This commit is contained in:
parent
0ec6a79505
commit
9743a9122d
@ -190,6 +190,7 @@ implementation
|
|||||||
cformaltype:=tformaldef.create(false);
|
cformaltype:=tformaldef.create(false);
|
||||||
ctypedformaltype:=tformaldef.create(true);
|
ctypedformaltype:=tformaldef.create(true);
|
||||||
voidtype:=torddef.create(uvoid,0,0);
|
voidtype:=torddef.create(uvoid,0,0);
|
||||||
|
voidpointertype:=tpointerdef.create(voidtype);
|
||||||
u8inttype:=torddef.create(u8bit,0,255);
|
u8inttype:=torddef.create(u8bit,0,255);
|
||||||
s8inttype:=torddef.create(s8bit,int64(-128),127);
|
s8inttype:=torddef.create(s8bit,int64(-128),127);
|
||||||
u16inttype:=torddef.create(u16bit,0,65535);
|
u16inttype:=torddef.create(u16bit,0,65535);
|
||||||
@ -270,7 +271,6 @@ implementation
|
|||||||
{$endif jvm}
|
{$endif jvm}
|
||||||
set_default_int_types;
|
set_default_int_types;
|
||||||
{ some other definitions }
|
{ some other definitions }
|
||||||
voidpointertype:=tpointerdef.create(voidtype);
|
|
||||||
charpointertype:=tpointerdef.create(cansichartype);
|
charpointertype:=tpointerdef.create(cansichartype);
|
||||||
widecharpointertype:=tpointerdef.create(cwidechartype);
|
widecharpointertype:=tpointerdef.create(cwidechartype);
|
||||||
{$ifdef i8086}
|
{$ifdef i8086}
|
||||||
@ -388,6 +388,7 @@ implementation
|
|||||||
addtype('$formal',cformaltype);
|
addtype('$formal',cformaltype);
|
||||||
addtype('$typedformal',ctypedformaltype);
|
addtype('$typedformal',ctypedformaltype);
|
||||||
addtype('$void',voidtype);
|
addtype('$void',voidtype);
|
||||||
|
addtype('$void_pointer',voidpointertype);
|
||||||
addtype('$byte',u8inttype);
|
addtype('$byte',u8inttype);
|
||||||
addtype('$shortint',s8inttype);
|
addtype('$shortint',s8inttype);
|
||||||
addtype('$word',u16inttype);
|
addtype('$word',u16inttype);
|
||||||
@ -412,7 +413,6 @@ implementation
|
|||||||
addtype('$wordbool',bool16type);
|
addtype('$wordbool',bool16type);
|
||||||
addtype('$longbool',bool32type);
|
addtype('$longbool',bool32type);
|
||||||
addtype('$qwordbool',bool64type);
|
addtype('$qwordbool',bool64type);
|
||||||
addtype('$void_pointer',voidpointertype);
|
|
||||||
addtype('$char_pointer',charpointertype);
|
addtype('$char_pointer',charpointertype);
|
||||||
addtype('$widechar_pointer',widecharpointertype);
|
addtype('$widechar_pointer',widecharpointertype);
|
||||||
addtype('$parentfp_void_pointer',parentfpvoidpointertype);
|
addtype('$parentfp_void_pointer',parentfpvoidpointertype);
|
||||||
@ -523,6 +523,7 @@ implementation
|
|||||||
loadtype('formal',cformaltype);
|
loadtype('formal',cformaltype);
|
||||||
loadtype('typedformal',ctypedformaltype);
|
loadtype('typedformal',ctypedformaltype);
|
||||||
loadtype('void',voidtype);
|
loadtype('void',voidtype);
|
||||||
|
loadtype('void_pointer',voidpointertype);
|
||||||
loadtype('char',cansichartype);
|
loadtype('char',cansichartype);
|
||||||
loadtype('widechar',cwidechartype);
|
loadtype('widechar',cwidechartype);
|
||||||
loadtype('shortstring',cshortstringtype);
|
loadtype('shortstring',cshortstringtype);
|
||||||
@ -548,7 +549,6 @@ implementation
|
|||||||
loadtype('wordbool',bool16type);
|
loadtype('wordbool',bool16type);
|
||||||
loadtype('longbool',bool32type);
|
loadtype('longbool',bool32type);
|
||||||
loadtype('qwordbool',bool64type);
|
loadtype('qwordbool',bool64type);
|
||||||
loadtype('void_pointer',voidpointertype);
|
|
||||||
loadtype('char_pointer',charpointertype);
|
loadtype('char_pointer',charpointertype);
|
||||||
loadtype('widechar_pointer',widecharpointertype);
|
loadtype('widechar_pointer',widecharpointertype);
|
||||||
loadtype('parentfp_void_pointer',parentfpvoidpointertype);
|
loadtype('parentfp_void_pointer',parentfpvoidpointertype);
|
||||||
|
Loading…
Reference in New Issue
Block a user