浏览代码

Fix arm-aros rtl compilation

git-svn-id: trunk@42090 -
pierre 6 年之前
父节点
当前提交
2ff391c25c
共有 1 个文件被更改,包括 1 次插入0 次删除
  1. 1 0
      compiler/arm/aasmcpu.pas

+ 1 - 0
compiler/arm/aasmcpu.pas

@@ -5577,6 +5577,7 @@ implementation
                     bytes:=bytes or (1 shl 24);
                     bytes:=bytes or (1 shl 24);
 
 
                   case oppostfix of
                   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_D: bytes:=bytes or (0 shl 22) or (1 shl 15);
                     PF_E: bytes:=bytes or (1 shl 22) or (0 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);
                     PF_P: bytes:=bytes or (1 shl 22) or (1 shl 15);