anchor.diff:  
   (import-now alexandria:simple-style-warning
               lparallel.util::symbolicate/package
  +            lparallel.kernel::*worker*
  +            lparallel.kernel::*make-limiter-data*
               lparallel.kernel::kernel
               lparallel.kernel::unwrap-result
               lparallel.kernel::wrap-error
               lparallel.kernel::make-task
               lparallel.kernel::make-task-fn
               lparallel.kernel::submit-raw-task
  -            lparallel.kernel::%kernel-worker-count
               lparallel.kernel::accept-task-p
               lparallel.kernel::limiter-data
               lparallel.kernel::with-limiter-slots
  -            lparallel.kernel::*make-limiter-data*
  -            lparallel.kernel::*worker*
               lparallel.kernel::steal-work
  -            lparallel.kernel::*kernel*
               lparallel.kernel::call-with-task-handler)
   
   ;;;; spin lock
  
positive.code: 
  (setf *make-limiter-data* 'make-limiter-data)
  
  (defun/inline use-caller-p (kernel)
    (/= (limiter-data-limit (limiter-data kernel))
        (%kernel-worker-count kernel)))
  
  
negative.code: 
  (defmacro future (kernel &body body)
    `(make-future ,kernel (make-task-fn ,@body)))
  
  ;;;; declarationp
  
  