b9b27db857cf
Fix syntax
author | Steve Losh <steve@stevelosh.com> |
---|---|
date | Thu, 23 Feb 2017 19:14:30 +0000 |
parents | 61661613f7b8 |
children | 6b92e67ede95 |
branches/tags | (none) |
files | src/reasoners/zdd.lisp |
Changes
--- a/src/reasoners/zdd.lisp Thu Feb 23 17:43:45 2017 +0000 +++ b/src/reasoners/zdd.lisp Thu Feb 23 19:14:30 2017 +0000 @@ -482,7 +482,7 @@ (defparameter *r* (make-zdd-reasoner *rules*)) (defparameter *i* (initial-iset *r*)) -(defun test ( +(defun test () (with-zdd (-<> (initial-iset *r*) @@ -503,4 +503,4 @@ (dump-iset *r* <>) (no <>) ; (draw-zdd *r* <>) - )))) + )))