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

merge r13489 from cpstrnew branch by florian:

Browse Source 
* made tcpstr1 work

git-svn-id: trunk@19086 -
This commit is contained in:
paul 2011-09-17 11:21:00 +00:00
parent 8cc22972a0
commit 27538f21a4
2 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
compiler/ncginl.pas
View File

@ -328,7 +328,6 @@ implementation
end;
{*****************************************************************************
LENGTH GENERIC HANDLING
*****************************************************************************}

2
rtl/i386/i386.inc
View File

@ -1643,7 +1643,7 @@ asm
.Lj3620:
movl (%esp),%eax
movl (%eax),%eax
subl $8,%eax
subl $12,%eax
call FPC_FREEMEM_X
movl (%esp),%eax
movl $0,(%eax)