ppc: 'neue' testfaelle angepasst
[testub10.git] / gesamt_ppc / codeb_georg_fib_044.0
index c8e1a16401da530dcb9653ce88fc6e8045e4c11f..ab90c9ba6c7e08fc542fa7187d644faf7406571e 100644 (file)
@@ -17,8 +17,8 @@ method fib(x)
        while not (x < 2)
        do
                t.c := t.a-(0-t.b);
-               t := t--8;
+               t := t--4;
                x := x-1;
        end;
-       return (t-8).c;
+       return (t-4).c;
 end;