X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=gesamt_ppc%2Fag_snafu_03.3;fp=gesamt_ppc%2Fag_snafu_03.3;h=fd67059b3814f6c5823bb23487e1b104a65ff61a;hb=4efb64bb228c31bf3d1701e0f0ec28f2c05ed451;hp=0000000000000000000000000000000000000000;hpb=70aa500ad5f5643fa386027158bf774a8195f604;p=testub10.git

diff --git a/gesamt_ppc/ag_snafu_03.3 b/gesamt_ppc/ag_snafu_03.3
new file mode 100644
index 0000000..fd67059
--- /dev/null
+++ b/gesamt_ppc/ag_snafu_03.3
@@ -0,0 +1,34 @@
+struct
+	a b c
+end;
+
+method bar(d e f)
+	var foo := a;
+	foo := b - c;
+	var bar := d - (e * f);
+	
+	if(4 = 2) then
+		var x := 1;
+		var hiho := 0;
+	else
+		var hiho := 0x1f;
+	end;
+
+	var hiho := 2;
+
+	while 0 < hiho do
+		if (42) then
+			hiho := hiho - 1;
+		else
+			hiho := hiho - (0 - a);
+		end;
+	end;
+
+	var e := 22; /* e existiert bereits */	
+	return 0;
+end;
+
+struct
+	g
+	h
+end;