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

   1 (*esto  deberia de dar erro*)
   2 struct a1 a2 a3 end;
   3
   4 func f(x,y)
   5
   6     var g:=1;
   7     var d:=1;
   8     if d = g then
   9     var t:=5;
  10     d:=x.a1;
  11     else
  12     t:=x.a2;
  13     end;
  14     return t;
  15
  16
  17 end;
  18
  19