paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-24 10:49:11 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ sanity check

Browse Source 
git-svn-id: trunk@41131 -
This commit is contained in:
florian 2019-01-29 20:40:41 +00:00
parent afd4599d26
commit 2f40f81890
1 changed files with 2 additions and 0 deletions

2
compiler/arm/agarmgas.pas
View File

@ -205,6 +205,8 @@ unit agarmgas;
s:=s+', rrx'
else if shiftmode <> SM_None then
s:=s+', '+gas_shiftmode2str[shiftmode]+' #'+tostr(shiftimm);
if offset<>0 then
Internalerror(2019012601);
end
else if offset<>0 then
s:=s+', #'+tostr(offset);