(system-segment-descriptorbits-equiv-under-mask x x1 mask) → *
Function:
(defun system-segment-descriptorbits-equiv-under-mask (x x1 mask) (declare (xargs :guard (and (system-segment-descriptorbits-p x) (system-segment-descriptorbits-p x1) (integerp mask)))) (let ((__function__ 'system-segment-descriptorbits-equiv-under-mask)) (declare (ignorable __function__)) (fty::int-equiv-under-mask (system-segment-descriptorbits-fix x) (system-segment-descriptorbits-fix x1) mask)))