(def sv1 (nlambda nil (prog (*a1 b) (load (quote "/usr/ucb/lib/lisp/hack")) (load (quote "/usr/ucb/lib/lisp/saux") ) (setq *a1 (getd (quote saveme))) (putd (quote saveme)) (putd (quote sv1)) ($mumble nil t) (reclaim 100 100) ($mumble) (eval (cons *a1]