Semi-working version

rtree-c/.hspec

 --failure-report .hspec-failures
+--fail-fast
 --rerun-all-on-success

rtree-c/develop.sh

-ghcid --command='cabal repl rtree-c-test' -r --reload=test/cases
+ghcid --command='cabal repl rtree-c-test' -r --reload=test/cases 

rtree-c/test/cases/large/llvm-26760.c

+// From https://dl.acm.org/doi/pdf/10.1145/3586049
+typedef signed int8_t;
+typedef short int16_t;
+typedef int int32_t;
+typedef unsigned uint32_t;
+int8_t g_100;
+int16_t func_33() {
+int8_t l_790;
+int32_t l_919 = 0x24F96B7BL;
+uint32_t l_1052;
+ if (l_790)
+ for (;;)
+ break;
+ else for (; l_919; --l_919);
+ int32_t l_1081 = 1L;
+ int32_t B4o4obl_919 = l_919;
+ int8_t B4o4ocg_100 = g_100;
+ int32_t B4o4odl_1369 = B4o4ocg_100;
+ uint32_t B4o4ofl_1433 = B4o4odl_1369;
+ LABEL_4o4og:;
+ l_1052 = l_1052 >> l_1081;
+ l_790 = B4o4ofl_1433;
+ if (l_790) {
+ l_1052 = l_1052 << B4o4obl_919;
+ goto LABEL_4o4og;
+ }
+ }
+ int main() {}

rtree-c/test/expected/constant/reduction/r000.c

-int x = 10;
-int main()
-{
-    int y = 25;
-    return x + y;
-}

rtree-c/test/expected/constant/reduction/r000.choices

-0 remove statement at ("test/cases/constant.c": line 5)
-0 inline variable y at ("test/cases/constant.c": line 4)
-0 inline variable x at ("test/cases/constant.c": line 1)

rtree-c/test/expected/constant/reduction/r000000.c

+// 0 inline variable x at ("test/cases/small/constant.c": line 1)
+// 0 inline variable y at ("test/cases/small/constant.c": line 4)
+// 0 remove statement at ("test/cases/small/constant.c": line 5)
+// 0 replace by zero at ("test/cases/small/constant.c": line 5)
+// 0 reduce to left at ("test/cases/small/constant.c": line 5)
+// 0 reduce to right at ("test/cases/small/constant.c": line 5)
+
+int x = 10;
+int main()
+{
+    int y = 25;
+    return x + y;
+}

rtree-c/test/expected/constant/reduction/r000001.c

+// 0 inline variable x at ("test/cases/small/constant.c": line 1)
+// 0 inline variable y at ("test/cases/small/constant.c": line 4)
+// 0 remove statement at ("test/cases/small/constant.c": line 5)
+// 0 replace by zero at ("test/cases/small/constant.c": line 5)
+// 0 reduce to left at ("test/cases/small/constant.c": line 5)
+// 1 reduce to right at ("test/cases/small/constant.c": line 5)
+
+int x = 10;
+int main()
+{
+    int y = 25;
+    return y;
+}

rtree-c/test/expected/constant/reduction/r00001.c

+// 0 inline variable x at ("test/cases/small/constant.c": line 1)
+// 0 inline variable y at ("test/cases/small/constant.c": line 4)
+// 0 remove statement at ("test/cases/small/constant.c": line 5)
+// 0 replace by zero at ("test/cases/small/constant.c": line 5)
+// 1 reduce to left at ("test/cases/small/constant.c": line 5)
+
+int x = 10;
+int main()
+{
+    int y = 25;
+    return x;
+}

rtree-c/test/expected/constant/reduction/r0001.c

+// 0 inline variable x at ("test/cases/small/constant.c": line 1)
+// 0 inline variable y at ("test/cases/small/constant.c": line 4)
+// 0 remove statement at ("test/cases/small/constant.c": line 5)
+// 1 replace by zero at ("test/cases/small/constant.c": line 5)
+
+int x = 10;
+int main()
+{
+    int y = 25;
+    return 0;
+}

rtree-c/test/expected/constant/reduction/r001.c

+// 0 inline variable x at ("test/cases/small/constant.c": line 1)
+// 0 inline variable y at ("test/cases/small/constant.c": line 4)
+// 1 remove statement at ("test/cases/small/constant.c": line 5)
+
 int x = 10;
 int main()
 {

rtree-c/test/expected/constant/reduction/r001.choices

-1 remove statement at ("test/cases/constant.c": line 5)
-0 inline variable y at ("test/cases/constant.c": line 4)
-0 inline variable x at ("test/cases/constant.c": line 1)

rtree-c/test/expected/constant/reduction/r010.c

-int x = 10;
-int main()
-{
-    return x + 25;
-}

rtree-c/test/expected/constant/reduction/r010.choices

-0 remove statement at ("test/cases/constant.c": line 5)
-1 inline variable y at ("test/cases/constant.c": line 4)
-0 inline variable x at ("test/cases/constant.c": line 1)

rtree-c/test/expected/constant/reduction/r010000.c

+// 0 inline variable x at ("test/cases/small/constant.c": line 1)
+// 1 inline variable y at ("test/cases/small/constant.c": line 4)
+// 0 remove statement at ("test/cases/small/constant.c": line 5)
+// 0 replace by zero at ("test/cases/small/constant.c": line 5)
+// 0 reduce to left at ("test/cases/small/constant.c": line 5)
+// 0 reduce to right at ("test/cases/small/constant.c": line 5)
+
+int x = 10;
+int main()
+{
+    return x + 25;
+}

rtree-c/test/expected/constant/reduction/r010001.c

+// 0 inline variable x at ("test/cases/small/constant.c": line 1)
+// 1 inline variable y at ("test/cases/small/constant.c": line 4)
+// 0 remove statement at ("test/cases/small/constant.c": line 5)
+// 0 replace by zero at ("test/cases/small/constant.c": line 5)
+// 0 reduce to left at ("test/cases/small/constant.c": line 5)
+// 1 reduce to right at ("test/cases/small/constant.c": line 5)
+
+int x = 10;
+int main()
+{
+    return 25;
+}