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

sinclairql: hopefully fix off-by-one processing in the packed relocs code

Browse Source 
git-svn-id: trunk@49232 -
This commit is contained in:
Károly Balogh 2021-04-19 05:42:18 +00:00
parent 71dc62dde6
commit 6dbcd17f54
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/sinclairql/si_prc.pp
View File

@ -107,7 +107,7 @@ asm
add.l d1,d2
add.l d0,(a0,d2)
subq.l #1,d7
bpl @relocloop
bgt @relocloop
{$ENDIF PACKEDRELOCS}
@noreloc: