(n64-to-i64 x) → *
Function: n64-to-i64$inline
(defun n64-to-i64$inline (x) (declare (type (unsigned-byte 64) x)) (declare (xargs :guard (n64p x))) (mbe :logic (logext 64 x) :exec (if (< x 9223372036854775808) x (- x 18446744073709551616))))