while ( 1 )   {
        threads->yield;
        
        last if $thread_abort;
        next unless $thread_continue;

        ++$iter;
 }