(declaim (inline find-page-index))
(define-alien-routine "find_page_index" long (index long))
(define-alien-variable "page_table"
(declaim (inline find-page-index))
(define-alien-routine "find_page_index" long (index long))
(define-alien-variable "page_table"