aus_sammelwut/paulchen/ublu/ss08/abgabe/gesamt/testcases/.svn/text-base/malandro06.3.svn-base

   1 (*esto si deberia de dar erro*)
   2 struct a1 a2 a3 end;
   3
   4 func f(x,y)
   5  if x = y then
   6    return a;
   7  end;
   8
   9   var a:=0;
  10   var b := (y+8);
  11   var c := y.b2;
  12   if b = c then
  13     a:=x.a1;
  14   else
  15     a:=x.d2;
  16   end;
  17   return a;
  18   var d:=1;
  19   if d = a then
  20   a:=3;
  21   end;
  22   return a;
  23 end;
  24
  25
  26
  27 struct c1 c2  b3 end;