15.2.6.2 Atomic push/pop

Old:

(without-interrupts

 (push value *global-list*))

     (without-interrupts

      (pop *global-list*))

New: use low level atomic operations.

(sys:atomic-push value *global-list*)

(sys:atomic-pop *global-list*)