(vls-get-unloaded-json scanned loaded) → *
Function:
(defun vls-get-unloaded-json (scanned loaded) (declare (xargs :guard (and (vls-scannedalist-p scanned) (vls-loadedalist-p loaded)))) (let ((__function__ 'vls-get-unloaded-json)) (declare (ignorable __function__)) (vls-scannedalist-to-json (vls-remove-from-scannedalist (alist-keys loaded) scanned))))