paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-12 21:09:07 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed indentation

Browse Source 
git-svn-id: trunk@35150 -
This commit is contained in:
Jonas Maebe 2016-12-18 13:57:06 +00:00
parent ca46040728
commit bcb7fedb3c
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
compiler/ncgrtti.pas
View File

@ -623,14 +623,14 @@ implementation
procedure orddef_rtti(def:torddef); procedure orddef_rtti(def:torddef);
procedure dointeger(typekind: byte); procedure dointeger(typekind: byte);
const const
trans : array[tordtype] of byte = trans : array[tordtype] of byte =
(otUByte{otNone}, (otUByte{otNone},
otUByte,otUWord,otULong,otUQWord,otUByte{otNone}, otUByte,otUWord,otULong,otUQWord,otUByte{otNone},
otSByte,otSWord,otSLong,otSQWord,otUByte{otNone}, otSByte,otSWord,otSLong,otSQWord,otUByte{otNone},
otUByte,otUWord,otULong,otUByte, otUByte,otUWord,otULong,otUByte,
otSByte,otSWord,otSLong,otSByte, otSByte,otSWord,otSLong,otSByte,
otUByte,otUWord,otUByte); otUByte,otUWord,otUByte);
begin begin
write_header(tcb,def,typekind); write_header(tcb,def,typekind);
tcb.begin_anonymous_record( tcb.begin_anonymous_record(