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

Fix arm-aros rtl compilation

Browse Source 
git-svn-id: trunk@42090 -
This commit is contained in:
pierre 2019-05-17 06:39:57 +00:00
parent 1d6b591872
commit 2ff391c25c
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
compiler/arm/aasmcpu.pas
View File

@ -5577,6 +5577,7 @@ implementation
bytes:=bytes or (1 shl 24);
case oppostfix of
PF_S: bytes:=bytes or (0 shl 22) or (0 shl 15);
PF_D: bytes:=bytes or (0 shl 22) or (1 shl 15);
PF_E: bytes:=bytes or (1 shl 22) or (0 shl 15);
PF_P: bytes:=bytes or (1 shl 22) or (1 shl 15);