paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-11 20:29:14 +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 dointeger(typekind: byte);
const
trans : array[tordtype] of byte =
(otUByte{otNone},
otUByte,otUWord,otULong,otUQWord,otUByte{otNone},
otSByte,otSWord,otSLong,otSQWord,otUByte{otNone},
otUByte,otUWord,otULong,otUByte,
otSByte,otSWord,otSLong,otSByte,
otUByte,otUWord,otUByte);
const
trans : array[tordtype] of byte =
(otUByte{otNone},
otUByte,otUWord,otULong,otUQWord,otUByte{otNone},
otSByte,otSWord,otSLong,otSQWord,otUByte{otNone},
otUByte,otUWord,otULong,otUByte,
otSByte,otSWord,otSLong,otSByte,
otUByte,otUWord,otUByte);
begin
write_header(tcb,def,typekind);
tcb.begin_anonymous_record(