X-Git-Url: http://wien.tomnetworks.com/gitweb/?p=testub10.git;a=blobdiff_plain;f=gesamt%2Fag_snafu_11.3;fp=gesamt%2Fag_snafu_11.3;h=6456a507eb01ad33eee9e45273e6511dc9134367;hp=0000000000000000000000000000000000000000;hb=029401d51612c5e69d7ac8603e1b69cd7ed6ef96;hpb=bf19094ac2573112418701ba4c6abf5779e3a9f7 diff --git a/gesamt/ag_snafu_11.3 b/gesamt/ag_snafu_11.3 new file mode 100644 index 0000000..6456a50 --- /dev/null +++ b/gesamt/ag_snafu_11.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.p3.g6:= 0xDEAD; /* p3 kein feld */ +end;