		Search-engine friendly clone of the ACL2 documentation.

Paging-bitstructs

Ia32e-pml4ebits-equiv-under-mask

Signature
(ia32e-pml4ebits-equiv-under-mask x x1 mask) → *
Arguments: x — Guard (ia32e-pml4ebits-p x).; x1 — Guard (ia32e-pml4ebits-p x1).; mask — Guard (integerp mask).

Definitions and Theorems

Function: ia32e-pml4ebits-equiv-under-mask

(defun ia32e-pml4ebits-equiv-under-mask (x x1 mask)
  (declare (xargs :guard (and (ia32e-pml4ebits-p x)
                              (ia32e-pml4ebits-p x1)
                              (integerp mask))))
  (let ((__function__ 'ia32e-pml4ebits-equiv-under-mask))
    (declare (ignorable __function__))
    (fty::int-equiv-under-mask (ia32e-pml4ebits-fix x)
                               (ia32e-pml4ebits-fix x1)
                               mask)))