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

* fixed formatting

Browse Source 
git-svn-id: trunk@29826 -
This commit is contained in:
Jonas Maebe 2015-02-23 22:48:05 +00:00
parent f886fe49d6
commit 73a9dc8077
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
compiler/symdef.pas
View File

@ -2005,12 +2005,12 @@ implementation
recsize:=size; recsize:=size;
is_intregable:= is_intregable:=
ispowerof2(recsize,temp) and ispowerof2(recsize,temp) and
(((recsize <= sizeof(asizeint)*2) (((recsize <= sizeof(asizeint)*2) and
{ records cannot go into registers on 16 bit targets for now } { records cannot go into registers on 16 bit targets for now }
and (sizeof(asizeint)>2) (sizeof(asizeint)>2) and
and not trecorddef(self).contains_float_field) or not trecorddef(self).contains_float_field) or
(recsize <= sizeof(asizeint))) (recsize <= sizeof(asizeint))) and
and not needs_inittable; not needs_inittable;
end; end;
end; end;
end; end;