summaryrefslogtreecommitdiff
path: root/irdecoderunit.pas
diff options
context:
space:
mode:
authorErich Eckner <git@eckner.net>2016-02-25 18:23:08 +0100
committerErich Eckner <git@eckner.net>2016-02-25 18:23:08 +0100
commitd1c830304c85a50be6b2fd92ace71463b621c3f3 (patch)
treec9955657aec2be33f56bdbe7145adf379d37b21b /irdecoderunit.pas
parent59a003e7c2b0211fabecd6c899b336e016e96ae9 (diff)
downloadunits-d1c830304c85a50be6b2fd92ace71463b621c3f3.tar.xz
Sortierbug entfernt in irdecoderunit.pas
Diffstat (limited to 'irdecoderunit.pas')
-rw-r--r--irdecoderunit.pas2
1 files changed, 1 insertions, 1 deletions
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;