(aliases-empty aliases) → aliases
Function:
(defun aliases-empty (aliases) (declare (xargs :stobjs (aliases))) (declare (xargs :guard t)) (let ((__function__ 'aliases-empty)) (declare (ignorable __function__)) (mbe :logic (non-exec nil) :exec (resize-aliass 0 aliases))))