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

* fixed compiler crash due to infinite recursion when compiling boolean to longint conversion on a 16 or 8-bit CPU

Browse Source 
git-svn-id: branches/i8086@24135 -
This commit is contained in:
nickysn 2013-04-03 00:16:41 +00:00
parent e76cee64cc
commit 889e8650f1
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/ncnv.pas
View File

@ -3079,7 +3079,7 @@ implementation
{ convert to a 64bit int (only necessary for 32bit processors) (JM) }
if resultdef.size > sizeof(aint) then
begin
result := ctypeconvnode.create_internal(left,s32inttype);
result := ctypeconvnode.create_internal(left,sinttype);
result := ctypeconvnode.create(result,resultdef);
left := nil;
firstpass(result);