Recognizer of a canonical address
(canonical-address-p lin-addr) → *
In 64-bit mode, a linear address is considered to be in
canonical form if address bits 63 through to the most-significant implemented
bit by the microarchitecture (represented by the constant
Function:
(defun canonical-address-p$inline (lin-addr) (declare (xargs :guard t)) (mbe :logic (signed-byte-p 48 lin-addr) :exec (and (integerp lin-addr) (<= -140737488355328 lin-addr) (< lin-addr 140737488355328))))
Theorem:
(defthm canonical-address-p-and-logext-48 (implies (canonical-address-p a) (equal (logext 48 a) a)))
Theorem:
(defthm canonical-address-p-of-logext-48 (canonical-address-p (logext 48 a)))