aus_sammelwut/paulchen/ublu/ss08/abgabe/codeb/testcases/.svn/text-base/malandro11.3.svn-base

   1 (*esto no deberia de dar erro*)
   2 struct a1 a2 a3 end;
   3
   4 func f(x,y)
   5   var d:=1;
   6   d:=x.a2;
   7
   8
   9   return d;
  10 end;
  11
  12
  13 struct b1 b2 b3 end;
  14
  15
  16
  17
  18 func f(x,y)
  19   var a:=1;
  20   a:=x.b2;
  21
  22   return d;
  23 end;
  24