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 /src/l-system.lisp | |
parent | 38e61b9e9a701968cc096c58d75cb2954a7484eb (diff) |
Fix small mistake in last commit.
Diffstat (limited to 'src/l-system.lisp')
-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*) |