Plaster

common-lisp
CL-USER> (defpackage #:random-package (:use) (:export #:foo)) #<PACKAGE "RANDOM-PACKAGE"> CL-USER> (defvar *symbol* 'random-package:foo) *SYMBOL* CL-USER> (delete-package '#:random-package) T CL-USER> *symbol* #:FOO CL-USER> (symbol-package *) NIL