1 files changed, 34 insertions, 0 deletions
diff --git a/gcc-4.9/gcc/testsuite/gcc.dg/torture/pta-escape-1.c b/gcc-4.9/gcc/testsuite/gcc.dg/torture/pta-escape-1.c
new file mode 100644
index 000000000..d3cb25437
--- /dev/null
+++ b/gcc-4.9/gcc/testsuite/gcc.dg/torture/pta-escape-1.c
@@ -0,0 +1,34 @@
+/* { dg-do run } */
+/* { dg-options "-fdump-tree-alias" } */
+/* { dg-skip-if "" { *-*-* } { "-O0" "-fno-fat-lto-objects" } { "" } } */
+
+int *p;
+void __attribute__((noinline,noclone))
+bar (void)
+{
+  *p = 1;
+}
+int __attribute__((noinline,noclone))
+foo (__INTPTR_TYPE__ addr)
+{
+  int i;
+  /* q points to ANYTHING */
+  int **q = (int **)addr;
+  /* this store needs to cause i to escape */
+  *q = &i;
+  i = 0;
+  /* and thus be clobbered by this function call */
+  bar ();
+  return i;
+}
+extern void abort (void);
+int
+main()
+{
+  if (foo ((__INTPTR_TYPE__)&p) != 1)
+    abort ();
+  return 0;
+}
+
+/* { dg-final { scan-tree-dump "ESCAPED = {\[^\n\}\]* i \[^\n\}\]*}" "alias" } } */
+/* { dg-final { cleanup-tree-dump "alias" } } */