From d1c830304c85a50be6b2fd92ace71463b621c3f3 Mon Sep 17 00:00:00 2001 From: Erich Eckner Date: Thu, 25 Feb 2016 18:23:08 +0100 Subject: Sortierbug entfernt in irdecoderunit.pas --- irdecoderunit.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/irdecoderunit.pas b/irdecoderunit.pas index c85e657..fa00f69 100644 --- a/irdecoderunit.pas +++ b/irdecoderunit.pas @@ -525,7 +525,7 @@ begin pv:=(befehlsTabelle[mi].nummer+befehlsTabelle[ma].nummer) div 2; // das pvZ:=(befehlsTabelle[mi].altZustand+befehlsTabelle[ma].altZustand) div 2; // Pivot-Element - if befehlsVergleich(mi,pv,pvZ)<0 then begin + if befehlsVergleich(mi,pv,pvZ)>0 then begin pv:=befehlsTabelle[mi].nummer; pvZ:=befehlsTabelle[mi].altZustand; end; -- cgit v1.2.3-70-g09d2