diff options
Diffstat (limited to 'compiler/psystem.pas')
| -rw-r--r-- | compiler/psystem.pas | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/compiler/psystem.pas b/compiler/psystem.pas index 9901c1d42b..d7bd1d54a9 100644 --- a/compiler/psystem.pas +++ b/compiler/psystem.pas @@ -243,6 +243,9 @@ implementation bool16type:=corddef.create(bool16bit,low(int64),high(int64),true); bool32type:=corddef.create(bool32bit,low(int64),high(int64),true); bool64type:=corddef.create(bool64bit,low(int64),high(int64),true); +{$ifdef llvm} + llvmbool1type:=corddef.create(pasbool8,0,1,true); +{$endif llvm} cansichartype:=corddef.create(uchar,0,255,true); cwidechartype:=corddef.create(uwidechar,0,65535,true); cshortstringtype:=cstringdef.createshort(255,true); @@ -413,6 +416,9 @@ implementation addtype('WordBool',bool16type); addtype('LongBool',bool32type); addtype('QWordBool',bool64type); +{$ifdef llvm} + addtype('LLVMBool1',llvmbool1type); +{$endif llvm} addtype('Byte',u8inttype); addtype('ShortInt',s8inttype); addtype('Word',u16inttype); @@ -459,6 +465,9 @@ implementation addtype('$wordbool',bool16type); addtype('$longbool',bool32type); addtype('$qwordbool',bool64type); +{$ifdef llvm} + addtype('$llvmbool1',llvmbool1type); +{$endif llvm} addtype('$char_pointer',charpointertype); addtype('$widechar_pointer',widecharpointertype); addtype('$parentfp_void_pointer',parentfpvoidpointertype); @@ -621,6 +630,9 @@ implementation loadtype('longint_farpointer',longintfarpointertype); {$endif i8086} {$endif x86} +{$ifdef llvm} + loadtype('llvmbool1',llvmbool1type); +{$endif llvm} loadtype('file',cfiletype); if not(target_info.system in systems_managed_vm) then begin |