(3 (setf (sap-ref-8 sap tail) (ldb (byte 8 16) mb)
(sap-ref-8 sap (1+ tail)) (ldb (byte 8 8) mb)
(sap-ref-8 sap (+ 2 tail)) (ldb (byte 8 0) mb))))))
(3 (setf (sap-ref-8 sap tail) (ldb (byte 8 16) mb)
(sap-ref-8 sap (1+ tail)) (ldb (byte 8 8) mb)
(sap-ref-8 sap (+ 2 tail)) (ldb (byte 8 0) mb))))))