X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=aus_sammelwut%2Fpaulchen%2Fublu%2Fss08%2Fabgabe%2Fgesamt%2Ftestcases%2Fmalandro04.3;fp=aus_sammelwut%2Fpaulchen%2Fublu%2Fss08%2Fabgabe%2Fgesamt%2Ftestcases%2Fmalandro04.3;h=0263da5fdf0986b4d38d91bd2bac6d837c6496f4;hb=f6171150f9e60240b256808fc31613530b21db6c;hp=0000000000000000000000000000000000000000;hpb=b82da83a0ad2014c11113818eee6bd5fb5f3445c;p=uebersetzerbau-ss10.git

diff --git a/aus_sammelwut/paulchen/ublu/ss08/abgabe/gesamt/testcases/malandro04.3 b/aus_sammelwut/paulchen/ublu/ss08/abgabe/gesamt/testcases/malandro04.3
new file mode 100644
index 0000000..0263da5
--- /dev/null
+++ b/aus_sammelwut/paulchen/ublu/ss08/abgabe/gesamt/testcases/malandro04.3
@@ -0,0 +1,24 @@
+(*esto si deberia de dar erro*)
+struct a1 a2 a3 end;
+struct b1 b2 b3 end;
+
+func f(x,y)
+ if x = y then
+   return a;
+ end;
+
+  var a:=0;
+  var b := (y+8);
+  var c := y.b2;
+  if b = c then
+    a:=x.a1;
+  else
+    a:=x.a2;
+  end;
+  return a;
+  var d:=1;
+  if d = a then
+  a:=3;
+  end;
+  return a;
+end;