X-Git-Url: http://wien.tomnetworks.com/gitweb/?p=testub10.git;a=blobdiff_plain;f=gesamt%2Fag_snafu_07.3;fp=gesamt%2Fag_snafu_07.3;h=8de0724e6a8edc8703be68c256c417f8ac7e9876;hp=0000000000000000000000000000000000000000;hb=029401d51612c5e69d7ac8603e1b69cd7ed6ef96;hpb=bf19094ac2573112418701ba4c6abf5779e3a9f7 diff --git a/gesamt/ag_snafu_07.3 b/gesamt/ag_snafu_07.3 new file mode 100644 index 0000000..8de0724 --- /dev/null +++ b/gesamt/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;