Add tests for split declaration pass

tests/transform/CMakeLists.txt

@@ -6,6 +6,7 @@ add_subdirectory(propagate)
 add_subdirectory(replace)
 add_subdirectory(interchange)
 add_subdirectory(reversal)
+add_subdirectory(split_decls)
 
 if (TSAR_ENABLE_FORTRAN)
   add_subdirectory(replace_const)

tests/transform/split_decls/CMakeLists.txt

@@ -0,0 +1,3 @@
+include(sapfor-testing)
+sapfor_add_test(TARGET ClangSplitDecls
+  TASKS "pass" TEST pass PASSNAME "-clang-split-decls")

tests/transform/split_decls/pass

@@ -0,0 +1,36 @@
+parallel
+split_decls_1/tsar
+split_decls_2/tsar
+split_decls_3/tsar
+split_decls_4/tsar
+split_decls_5/tsar
+split_decls_6/tsar
+split_decls_7/tsar
+split_decls_8/tsar
+split_decls_9/tsar
+split_decls_10/tsar
+split_decls_11/tsar
+split_decls_12/tsar
+split_decls_13/tsar
+split_decls_14/tsar
+split_decls_15/tsar
+split_decls_16/tsar
+split_decls_17/tsar
+split_decls_18/tsar
+split_decls_19/tsar
+split_decls_20/tsar
+split_decls_21/tsar
+split_decls_22/tsar
+split_decls_23/tsar
+split_decls_24/tsar
+split_decls_25/tsar
+split_decls_26/tsar
+split_decls_27/tsar
+split_decls_28/tsar
+split_decls_29/tsar
+split_decls_30/tsar
+split_decls_31/tsar
+split_decls_32/tsar
+split_decls_33/tsar
+split_decls_34/tsar
+end_parallel

tests/transform/split_decls/split_decls_1/main.c

@@ -0,0 +1,6 @@
+int main() {
+    int x;
+    unsigned int y;
+    double z[10];
+    return 0;
+}

tests/transform/split_decls/split_decls_1/sample/main.c

@@ -0,0 +1,6 @@
+int main() {
+    int x;
+    unsigned int y;
+    double z[10];
+    return 0;
+}

tests/transform/split_decls/split_decls_1/tsar.conf

@@ -0,0 +1,8 @@
+plugin = TsarPlugin
+add_include_path = $include
+sources = main.c
+copy = $sources
+sample = $copy output.txt
+clean = $sample *.orig
+options = -clang-split-decls
+run = "$tsar $sources $options 2>&1 | $perl -p $sys_dir/filters/output.pl >output.txt"

tests/transform/split_decls/split_decls_10/main.c

@@ -0,0 +1,4 @@
+int main() {
+    int a, *b, **c, ***d;
+    return 0;
+}

tests/transform/split_decls/split_decls_10/sample/main.c

@@ -0,0 +1,8 @@
+int main() {
+  int a;
+  int *b;
+  int **c;
+  int ***d;
+
+  return 0;
+}

tests/transform/split_decls/split_decls_10/tsar.conf

@@ -0,0 +1,8 @@
+plugin = TsarPlugin
+add_include_path = $include
+sources = main.c
+copy = $sources
+sample = $copy output.txt
+clean = $sample *.orig
+options = -clang-split-decls
+run = "$tsar $sources $options 2>&1 | $perl -p $sys_dir/filters/output.pl >output.txt"

tests/transform/split_decls/split_decls_11/main.c

@@ -0,0 +1,4 @@
+int main() {
+    char *a[10], (*b)[10];
+    return 0;
+}

tests/transform/split_decls/split_decls_11/sample/main.c

@@ -0,0 +1,6 @@
+int main() {
+  char *a[10];
+  char(*b)[10];
+
+  return 0;
+}

tests/transform/split_decls/split_decls_11/tsar.conf

@@ -0,0 +1,8 @@
+plugin = TsarPlugin
+add_include_path = $include
+sources = main.c
+copy = $sources
+sample = $copy output.txt
+clean = $sample *.orig
+options = -clang-split-decls
+run = "$tsar $sources $options 2>&1 | $perl -p $sys_dir/filters/output.pl >output.txt"

tests/transform/split_decls/split_decls_12/main.c

@@ -0,0 +1,4 @@
+int main() {
+    const volatile int a, b, c;
+    return 0;
+}

tests/transform/split_decls/split_decls_12/sample/main.c

@@ -0,0 +1,7 @@
+int main() {
+  const volatile int a;
+  const volatile int b;
+  const volatile int c;
+
+  return 0;
+}

tests/transform/split_decls/split_decls_12/tsar.conf

@@ -0,0 +1,8 @@
+plugin = TsarPlugin
+add_include_path = $include
+sources = main.c
+copy = $sources
+sample = $copy output.txt
+clean = $sample *.orig
+options = -clang-split-decls
+run = "$tsar $sources $options 2>&1 | $perl -p $sys_dir/filters/output.pl >output.txt"

tests/transform/split_decls/split_decls_13/main.c

@@ -0,0 +1,4 @@
+int main() {
+    volatile int const *a, b, c;
+    return 0;
+}

tests/transform/split_decls/split_decls_13/sample/main.c

@@ -0,0 +1,4 @@
+int main() {
+    volatile int const *a, b, c;
+    return 0;
+}

tests/transform/split_decls/split_decls_13/tsar.conf

@@ -0,0 +1,8 @@
+plugin = TsarPlugin
+add_include_path = $include
+sources = main.c
+copy = $sources
+sample = $copy output.txt
+clean = $sample *.orig
+options = -clang-split-decls
+run = "$tsar $sources $options 2>&1 | $perl -p $sys_dir/filters/output.pl >output.txt"

tests/transform/split_decls/split_decls_14/main.c

@@ -0,0 +1,4 @@
+int main() {
+    int a = 0, b = 1, c = 2;
+    return 0;
+}

tests/transform/split_decls/split_decls_14/sample/main.c

@@ -0,0 +1,7 @@
+int main() {
+  int a = 0;
+  int b = 1;
+  int c = 2;
+
+  return 0;
+}

tests/transform/split_decls/split_decls_14/tsar.conf

@@ -0,0 +1,8 @@
+plugin = TsarPlugin
+add_include_path = $include
+sources = main.c
+copy = $sources
+sample = $copy output.txt
+clean = $sample *.orig
+options = -clang-split-decls
+run = "$tsar $sources $options 2>&1 | $perl -p $sys_dir/filters/output.pl >output.txt"

tests/transform/split_decls/split_decls_15/main.c

@@ -0,0 +1,4 @@
+int main() {
+    double a[10] = {5,7,2}, b[20] = {0}, c[10][100];
+    return 0;
+}

tests/transform/split_decls/split_decls_15/sample/main.c

@@ -0,0 +1,7 @@
+int main() {
+  double a[10] = {5, 7, 2};
+  double b[20] = {0};
+  double c[10][100];
+
+  return 0;
+}

tests/transform/split_decls/split_decls_15/tsar.conf

@@ -0,0 +1,8 @@
+plugin = TsarPlugin
+add_include_path = $include
+sources = main.c
+copy = $sources
+sample = $copy output.txt
+clean = $sample *.orig
+options = -clang-split-decls
+run = "$tsar $sources $options 2>&1 | $perl -p $sys_dir/filters/output.pl >output.txt"

tests/transform/split_decls/split_decls_16/main.c

@@ -0,0 +1,5 @@
+int main() {
+    int a = 0, b = 1;
+    int *c = &a, *d = &b;
+    return 0;
+}

tests/transform/split_decls/split_decls_16/sample/main.c

@@ -0,0 +1,9 @@
+int main() {
+  int a = 0;
+  int b = 1;
+
+  int *c = &a;
+  int *d = &b;
+
+  return 0;
+}

tests/transform/split_decls/split_decls_16/tsar.conf

@@ -0,0 +1,8 @@
+plugin = TsarPlugin
+add_include_path = $include
+sources = main.c
+copy = $sources
+sample = $copy output.txt
+clean = $sample *.orig
+options = -clang-split-decls
+run = "$tsar $sources $options 2>&1 | $perl -p $sys_dir/filters/output.pl >output.txt"

tests/transform/split_decls/split_decls_17/main.c

@@ -0,0 +1,4 @@
+int main() {
+    int (*f)(int N, int(*C)[N]), x, (*restrict Q)[100], C[200][300];
+    return 0;
+}

tests/transform/split_decls/split_decls_17/sample/main.c

@@ -0,0 +1,4 @@
+int main() {
+    int (*f)(int N, int(*C)[N]), x, (*restrict Q)[100], C[200][300];
+    return 0;
+}

tests/transform/split_decls/split_decls_17/tsar.conf

@@ -0,0 +1,8 @@
+plugin = TsarPlugin
+add_include_path = $include
+sources = main.c
+copy = $sources
+sample = $copy output.txt
+clean = $sample *.orig
+options = -clang-split-decls
+run = "$tsar $sources $options 2>&1 | $perl -p $sys_dir/filters/output.pl >output.txt"

tests/transform/split_decls/split_decls_18/main.c

@@ -0,0 +1,7 @@
+int x;
+unsigned int y;
+double z[10];
+
+int main() {
+    return 0;
+}

tests/transform/split_decls/split_decls_18/sample/main.c

@@ -0,0 +1,7 @@
+int x;
+unsigned int y;
+double z[10];
+
+int main() {
+    return 0;
+}

tests/transform/split_decls/split_decls_18/tsar.conf

@@ -0,0 +1,8 @@
+plugin = TsarPlugin
+add_include_path = $include
+sources = main.c
+copy = $sources
+sample = $copy output.txt
+clean = $sample *.orig
+options = -clang-split-decls
+run = "$tsar $sources $options 2>&1 | $perl -p $sys_dir/filters/output.pl >output.txt"

tests/transform/split_decls/split_decls_19/main.c

@@ -0,0 +1,9 @@
+struct S {
+    int x, y;
+};
+
+int x, y;
+
+int main() {
+    return 0;
+}

tests/transform/split_decls/split_decls_19/sample/main.c

@@ -0,0 +1,8 @@
+struct S {
+  int x, y;
+};
+
+int x;
+int y;
+
+int main() { return 0; }

tests/transform/split_decls/split_decls_19/tsar.conf

@@ -0,0 +1,8 @@
+plugin = TsarPlugin
+add_include_path = $include
+sources = main.c
+copy = $sources
+sample = $copy output.txt
+clean = $sample *.orig
+options = -clang-split-decls
+run = "$tsar $sources $options 2>&1 | $perl -p $sys_dir/filters/output.pl >output.txt"

tests/transform/split_decls/split_decls_2/main.c

@@ -0,0 +1,8 @@
+struct S {
+    int x, y;
+};
+
+int main() {
+    int x;
+    return 0;
+}

tests/transform/split_decls/split_decls_2/sample/main.c

@@ -0,0 +1,8 @@
+struct S {
+    int x, y;
+};
+
+int main() {
+    int x;
+    return 0;
+}

tests/transform/split_decls/split_decls_2/tsar.conf

@@ -0,0 +1,8 @@
+plugin = TsarPlugin
+add_include_path = $include
+sources = main.c
+copy = $sources
+sample = $copy output.txt
+clean = $sample *.orig
+options = -clang-split-decls
+run = "$tsar $sources $options 2>&1 | $perl -p $sys_dir/filters/output.pl >output.txt"

tests/transform/split_decls/split_decls_20/main.c

@@ -0,0 +1,6 @@
+int x, y;
+
+int main() {
+    int a, b;
+    return 0;
+}

tests/transform/split_decls/split_decls_20/sample/main.c

@@ -0,0 +1,9 @@
+int x;
+int y;
+
+int main() {
+  int a;
+  int b;
+
+  return 0;
+}

tests/transform/split_decls/split_decls_20/tsar.conf

@@ -0,0 +1,8 @@
+plugin = TsarPlugin
+add_include_path = $include
+sources = main.c
+copy = $sources
+sample = $copy output.txt
+clean = $sample *.orig
+options = -clang-split-decls
+run = "$tsar $sources $options 2>&1 | $perl -p $sys_dir/filters/output.pl >output.txt"

tests/transform/split_decls/split_decls_21/main.c

@@ -0,0 +1,5 @@
+int a, b, c, d, e, f;
+
+int main() {
+    return 0;
+}

tests/transform/split_decls/split_decls_21/sample/main.c

@@ -0,0 +1,8 @@
+int a;
+int b;
+int c;
+int d;
+int e;
+int f;
+
+int main() { return 0; }