From d0b8f2d9789cfba6da454c0981174536a7c20747 Mon Sep 17 00:00:00 2001 From: Gabriel Tofvesson Date: Tue, 30 Apr 2019 18:30:14 +0200 Subject: [PATCH] Optimize final bucketsort call --- ucode/sort4.uc | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/ucode/sort4.uc b/ucode/sort4.uc index 397a77b..08a9e05 100644 --- a/ucode/sort4.uc +++ b/ucode/sort4.uc @@ -99,7 +99,7 @@ mov pm ir; incpc; call @JTABLE mov pm ir; incpc; call @JTABLE mov pm ir; incpc; call @JTABLE mov pm ir; incpc; call @JTABLE -mov pm ir; incpc; call @JTABLE +mov pm ir; call @JTABLE_SPEC //call @BREAK @@ -108,8 +108,6 @@ mov pm ir; incpc; call @JTABLE // Initialize state for merge const BUCKET_SIZE mov ar hr -const LIST_START -mov ar pc const HIGHEST_BUCKET @@ -149,6 +147,10 @@ halt $JTABLE mov pc hr; bop +$JTABLE_SPEC +const LIST_START +mov ar hr; bop + // IR OP-field jump table $OT_0 const 0x38