ppc: 'neue' testfaelle angepasst
[testub10.git] / gesamt_ppc / codeb_intelli_15.0
index 7ed79aa07583cc7a5c12217b815e3cee6ce1f5a3..0f789d92195ea6bf7ebe59a66e680b5a86dd8e2a 100644 (file)
@@ -6,9 +6,9 @@ method m1(size)
         var i:= 0;
         while not (i = size) do
                 if i < 1 then
-                        (this - (i * -8)).x := (this - (i * -8)).x - (-20);
+                        (this - (i * -4)).x := (this - (i * -4)).x - (-20);
                 else
-                                       (this - (i * -8)).x := (this - ((i - 1) * -8)).x or 128;
+                                       (this - (i * -4)).x := (this - ((i - 1) * -4)).x or 128;
                                end;
                                i := i - -1;
         end;