|
From: | Stefan Monnier |
Subject: | Re: Generic `tree-seq` function definition? |
Date: | Fri, 06 Sep 2013 11:17:07 -0400 |
User-agent: | Gnus/5.13 (Gnus v5.13) Emacs/24.3.50 (gnu/linux) |
> (defun tree-seq (branch? children root) > (cl-labels ((walk (node) > (cons node > (if (funcall branch? node) > (cl-mapcan 'walk (cddr (funcall children ^^^^^ This is the `walk' symbol. You want the `walk' function instead. I.e. use #'walk Stefan
[Prev in Thread] | Current Thread | [Next in Thread] |