From 96858dd64d2b45dbf15732032a87fb893ed21e96 Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sat, 5 Nov 2016 23:05:57 +0000
Subject: [PATCH] + additional tests which ensure that constant propagation is
 off   as the compiler optimizes the original tests too much with constant
 propagation   to keep them useful

git-svn-id: trunk@34796 -
---
 .gitattributes             | 4 ++++
 tests/test/cg/tcnvint3b.pp | 2 ++
 tests/test/cg/tlohi2.pp    | 2 ++
 tests/webtbs/tw3272b.pp    | 2 ++
 tests/webtbs/tw6769b.pp    | 2 ++
 5 files changed, 12 insertions(+)
 create mode 100644 tests/test/cg/tcnvint3b.pp
 create mode 100644 tests/test/cg/tlohi2.pp
 create mode 100644 tests/webtbs/tw3272b.pp
 create mode 100644 tests/webtbs/tw6769b.pp

diff --git a/.gitattributes b/.gitattributes
index 8aa8b12787..28548b4c3a 100644
--- a/.gitattributes
+++ b/.gitattributes
@@ -11467,6 +11467,7 @@ tests/test/cg/tclatype.pp svneol=native#text/plain
 tests/test/cg/tcnvint1.pp svneol=native#text/plain
 tests/test/cg/tcnvint2.pp svneol=native#text/plain
 tests/test/cg/tcnvint3.pp svneol=native#text/plain
+tests/test/cg/tcnvint3b.pp svneol=native#text/pascal
 tests/test/cg/tcnvint4.pp svneol=native#text/plain
 tests/test/cg/tcnvint5.pp svneol=native#text/plain
 tests/test/cg/tcnvint6.pp svneol=native#text/plain
@@ -11494,6 +11495,7 @@ tests/test/cg/tis.pp svneol=native#text/plain
 tests/test/cg/tldparam.pp svneol=native#text/plain
 tests/test/cg/tloadvmt.pp svneol=native#text/plain
 tests/test/cg/tlohi.pp svneol=native#text/plain
+tests/test/cg/tlohi2.pp svneol=native#text/pascal
 tests/test/cg/tmanypar.pp svneol=native#text/plain
 tests/test/cg/tmoddiv.pp svneol=native#text/plain
 tests/test/cg/tmoddiv1.pp svneol=native#text/plain
@@ -15297,6 +15299,7 @@ tests/webtbs/tw3261.pp svneol=native#text/plain
 tests/webtbs/tw3263.pp svneol=native#text/plain
 tests/webtbs/tw3265.pp svneol=native#text/plain
 tests/webtbs/tw3272.pp svneol=native#text/plain
+tests/webtbs/tw3272b.pp svneol=native#text/pascal
 tests/webtbs/tw3274.pp svneol=native#text/plain
 tests/webtbs/tw3280.pp svneol=native#text/plain
 tests/webtbs/tw3281.pp svneol=native#text/plain
@@ -15591,6 +15594,7 @@ tests/webtbs/tw6737.pp svneol=native#text/plain
 tests/webtbs/tw6742.pp svneol=native#text/plain
 tests/webtbs/tw6767.pp svneol=native#text/plain
 tests/webtbs/tw6769.pp svneol=native#text/plain
+tests/webtbs/tw6769b.pp svneol=native#text/pascal
 tests/webtbs/tw6822a.pp svneol=native#text/plain
 tests/webtbs/tw6822b.pp svneol=native#text/plain
 tests/webtbs/tw6822c.pp svneol=native#text/plain
diff --git a/tests/test/cg/tcnvint3b.pp b/tests/test/cg/tcnvint3b.pp
new file mode 100644
index 0000000000..a52d958eb5
--- /dev/null
+++ b/tests/test/cg/tcnvint3b.pp
@@ -0,0 +1,2 @@
+{ %OPT=-Oonoconstprop }
+{$i tcnvint3.pp}
diff --git a/tests/test/cg/tlohi2.pp b/tests/test/cg/tlohi2.pp
new file mode 100644
index 0000000000..ba09cbc92a
--- /dev/null
+++ b/tests/test/cg/tlohi2.pp
@@ -0,0 +1,2 @@
+{ %OPT=-Oonoconstprop }
+{$i tlohi.pp}
diff --git a/tests/webtbs/tw3272b.pp b/tests/webtbs/tw3272b.pp
new file mode 100644
index 0000000000..ae4867c892
--- /dev/null
+++ b/tests/webtbs/tw3272b.pp
@@ -0,0 +1,2 @@
+{ %OPT=-Oonoconstprop}
+{$i tw3272.pp}
diff --git a/tests/webtbs/tw6769b.pp b/tests/webtbs/tw6769b.pp
new file mode 100644
index 0000000000..f8474cd2aa
--- /dev/null
+++ b/tests/webtbs/tw6769b.pp
@@ -0,0 +1,2 @@
+{ %OPT=-Oonoconstprop}
+{$i tw6769.pp}
\ No newline at end of file