X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=gesamt_ppc%2Fag_snafu_07.3;fp=gesamt_ppc%2Fag_snafu_07.3;h=8de0724e6a8edc8703be68c256c417f8ac7e9876;hb=4efb64bb228c31bf3d1701e0f0ec28f2c05ed451;hp=0000000000000000000000000000000000000000;hpb=70aa500ad5f5643fa386027158bf774a8195f604;p=testub10.git diff --git a/gesamt_ppc/ag_snafu_07.3 b/gesamt_ppc/ag_snafu_07.3 new file mode 100644 index 0000000..8de0724 --- /dev/null +++ b/gesamt_ppc/ag_snafu_07.3 @@ -0,0 +1,9 @@ +struct g1 g2 g3 g4 end; +struct g5 g6 end; + +method foo(p1 p2 p3) + var l1 := 0; + var l2 := g6; + + g1.g2.p1 := 0xDEAD; /* p1 kein feld */ +end;