tests/rs1.d

   1 #!/usr/local/bin/rune -x
   2 #
   3 # RefStor related tests for the compiler
   4
   5 limport "sys";
   6 import "stdio";
   7
   8 int
   9 main(int ac, char **av)
  10 {
  11         int x;
  12
  13         x = *fubar(&x);
  14         x = *fubar(&x);
  15         x = *fubar(&x);
  16 }
  17
  18 int *
  19 fubar(int *pp)
  20 {
  21         heap int x;
  22         int *ptr;
  23
  24         *pp = 1;
  25         x = 1;
  26         ptr = &x + 1;
  27
  28         return pp;
  29 }