gesamt/ag_snafu_02.3

   1 struct
   2         a b c
   3 end;
   4
   5 method bar(d e f)
   6         var foo := a;
   7         foo := b - c;
   8         var bar := d - (e * f);
   9
  10         if(4 = 2) then
  11                 var x := 1;
  12                 var hiho := 0;
  13         else
  14                 var hiho := 0x1f;
  15         end;
  16
  17         var hiho := 2;
  18
  19         while 0 < hiho do
  20                 if (42) then
  21                         hiho := hiho - 1;
  22                 else
  23                         hiho := hiho - (0 - g); /* g existiert noch nicht */
  24                 end;
  25         end;
  26
  27         return 0;
  28 end;
  29
  30 struct
  31         g
  32         h
  33 end;