(get-vls-commands world) → *
Function: get-vls-commands
(defun get-vls-commands (world) (declare (xargs :guard t)) (let ((__function__ 'get-vls-commands)) (declare (ignorable __function__)) (cdr (assoc-eq 'commands (table-alist 'vl-server world)))))