Extend a value in the sneaky store.
(sneaky-push name what) → *
Example:
(sneaky-save 'foo '(3)) (sneaky-push 'foo 4) (sneaky-load 'foo state) --> (mv '(4 3) state)
In the logic,
Function:
(defun sneaky-push (name what) (declare (xargs :guard t)) (let ((__function__ 'sneaky-push)) (declare (ignorable __function__)) (sneaky-mutate 'sneaky-push-mutator (list name) (cons name what))))