test.m

typedef struct {
    BOOL scheduled;
    OSSpinLock lock;
} PAScheduleOnceToken;

static char PAScheduleOnceTokenKey;

static void PAScheduleOnce(dispatch_queue_t queue, void (^block)())
{
    PAScheduleOnceToken* tokenPointer = (PAScheduleOnceToken*)dispatch_queue_get_specific(queue, &PAScheduleOnceTokenKey);
    if (!tokenPointer) {
        tokenPointer = (PAScheduleOnceToken*)malloc(sizeof(PAScheduleOnceToken));
        *tokenPointer = (PAScheduleOnceToken){.scheduled = NO, .lock = OS_SPINLOCK_INIT};
        dispatch_queue_set_specific(queue, &PAScheduleOnceTokenKey, tokenPointer, free);
    }
    
    if (tokenPointer && block) {
        OSSpinLockLock(&(tokenPointer->lock));
        BOOL scheduled = tokenPointer->scheduled;
        OSSpinLockUnlock(&(tokenPointer->lock));
        
        if (!scheduled) {
            dispatch_source_t timer = dispatch_source_create(DISPATCH_SOURCE_TYPE_TIMER, 0, 0, queue);
            if (timer) {
                OSSpinLockLock(&(tokenPointer->lock));
                tokenPointer->scheduled = YES;
                OSSpinLockUnlock(&(tokenPointer->lock));
                
                dispatch_source_set_timer(timer, dispatch_time(DISPATCH_TIME_NOW, 0 * NSEC_PER_SEC), 0 * NSEC_PER_SEC, (1ull * NSEC_PER_SEC) / 10);
                dispatch_source_set_event_handler(timer, ^ {
                    block();
                    dispatch_source_cancel(timer);

                    
                    OSSpinLockLock(&(tokenPointer->lock));
                    tokenPointer->scheduled = NO;
                    OSSpinLockUnlock(&(tokenPointer->lock));
                });
                dispatch_resume(timer);
            }
        }
    }
}