Move scratch garbage into the scratch file
| author |
Steve Losh <steve@stevelosh.com> |
| date |
Fri, 25 Mar 2016 11:53:03 +0000 |
| parents |
203653ce4866
|
| children |
48e1170dba5c
|
| branches/tags |
(none) |
| files |
src/wam.lisp |
Changes
--- a/src/wam.lisp Fri Mar 25 11:51:13 2016 +0000
+++ b/src/wam.lisp Fri Mar 25 11:53:03 2016 +0000
@@ -382,19 +382,3 @@
instructions)
(values))
-
-(defparameter p
- '(p :z
- (h :z :w)
- (f :w)))
-
-
-(defparameter *wam* (make-wam))
-
-(dump-heap-full (wam-heap *wam*))
-
-(run *wam* (parse p))
-
-(dump-wam-full *wam*)
-(dump-wam-around *wam* 12 3)
-