Optimize final bucketsort call

This commit is contained in:
Gabriel Tofvesson 2019-04-30 18:30:14 +02:00
parent 37f1afe452
commit d0b8f2d978

View File

@ -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