testsuite/semok/optimize.stp

   1 #! stap -wp2
   2
   3 # We count on the optimizer to blow away these ridiculous
   4 # expressions, since they have no effect on the output.
   5
   6 global b
   7
   8 function zoo (x) {
   9   return "tada" + x
  10 }
  11
  12 probe begin {
  13   a = b + 2
  14   zoo (zoo (5))
  15   b = "goodbye"
  16   no . $such . $target + $variable
  17 }
  18
  19 # bug #2599
  20 probe begin{for(i=1;i-=2;i++);}
  21 probe begin{while(i+=2);}
  22 probe begin{if(i=j);}
  23
  24 global ii
  25 probe begin{for(ii=1;ii-=2;ii++);}
  26 probe begin{while(ii+=2);}
  27 probe begin{if(ii=j);}
  28
  29 # bug #6466
  30 global goo
  31
  32 probe begin { while (24) ; }
  33 probe begin { for (2<$i; zoo(333); poo) ; }
  34 probe begin { foreach (x in goo) goo[x]+1; }
  35 probe begin { foo = $bar; if (foo) {} }
  36 probe begin { { { { } } } }
  37 function useful () { return 1 }
  38 probe begin { println (useful()) } /* don't elide this one! */