1/* { dg-do run } */
2/* { dg-options "-O2 -fdump-tree-strlen" } */
3
4#include "strlenopt.h"
5
6int
7main ()
8{
9  char p[] = "foobar";
10  int len, len2;
11  len = strlen (p);
12  p[0] = 'O';
13  len2 = strlen (p);
14  return len - len2;
15}
16
17/* { dg-final { scan-tree-dump-times "strlen \\(" 0 "strlen" } } */
18/* { dg-final { cleanup-tree-dump "strlen" } } */
19