summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorflorian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2>2019-06-11 20:03:47 +0000
committerflorian <florian@3ad0048d-3df7-0310-abae-a5850022a9f2>2019-06-11 20:03:47 +0000
commit60a46b2058d52570d02f36c6fa6cbb16a791fceb (patch)
tree14bd9914f7ff7c7409671ccde37d3d574139cded
parent1e48a290be811ceb35ea322e25b2b3193629d950 (diff)
downloadfpc-60a46b2058d52570d02f36c6fa6cbb16a791fceb.tar.gz
* suppress warning for targets without MM registers
git-svn-id: https://svn.freepascal.org/svn/fpc/trunk@42214 3ad0048d-3df7-0310-abae-a5850022a9f2
-rw-r--r--compiler/hlcg2ll.pas4
1 files changed, 4 insertions, 0 deletions
diff --git a/compiler/hlcg2ll.pas b/compiler/hlcg2ll.pas
index 570844adca..b489dc4de7 100644
--- a/compiler/hlcg2ll.pas
+++ b/compiler/hlcg2ll.pas
@@ -1319,6 +1319,10 @@ implementation
ncgutil.maketojumpboollabels(list,p,truelabel,falselabel);
end;
+{$if first_mm_imreg = 0}
+ {$WARN 4044 OFF} { Comparison might be always false ... }
+{$endif}
+
procedure thlcg2ll.gen_load_para_value(list: TAsmList);
procedure get_para(const paraloc:TCGParaLocation);