diff options
| author | Bruno Cichon <ebrasca.ebrasca@openmailbox.org> | 2016-10-22 21:53:28 +0200 |
|---|---|---|
| committer | Bruno Cichon <ebrasca.ebrasca@openmailbox.org> | 2016-10-22 21:53:28 +0200 |
| commit | bdb5e6cb89d2bebc94fa5ab01e4539af0adf0b5c (patch) | |
| tree | 1a4021808f5f9ba26ee9fad3899ca4f62cdf8a30 | |
| parent | 38e61b9e9a701968cc096c58d75cb2954a7484eb (diff) | |
Fix small mistake in last commit.
| -rw-r--r-- | src/l-system.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/l-system.lisp b/src/l-system.lisp index 591f43f..13d9992 100644 --- a/src/l-system.lisp +++ b/src/l-system.lisp @@ -18,7 +18,7 @@ (for func = (gethash symbol *l-system-clauses*)) (appending (if (functionp func) (apply func parameters) - parameters)))) + (list `(,symbol ,@parameters)))))) (defmacro setf-l-system-rule (symbol lambda) `(setf (gethash ,symbol *l-system-clauses*) |