From 9dd437997f7478f943b2f0ab19913737a7b49215 Mon Sep 17 00:00:00 2001 From: Doni Pracner Date: Thu, 6 Feb 2014 16:22:04 +0100 Subject: [PATCH] PolinomL - ispravka jednog slucaja brisanja clana --- kodovi/polinomi/POLINOML.MOD | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/kodovi/polinomi/POLINOML.MOD b/kodovi/polinomi/POLINOML.MOD index 6063d5d..309b349 100644 --- a/kodovi/polinomi/POLINOML.MOD +++ b/kodovi/polinomi/POLINOML.MOD @@ -100,11 +100,11 @@ BEGIN cilj^.k:=k; ELSE IF p = cilj THEN - DISPOSE(p); + p := p^.veza; ELSE prethodni^.veza:= prethodni^.veza^.veza; - DISPOSE(cilj); END; + DISPOSE(cilj); END; ELSE IF k # 0.0 THEN -- 2.17.1