In fact, it is enough to replace (drop-last sibs) with (remove seq?
sibs).
.
On Feb 12, 9:54 pm, Marko Topolnik <marko.topol...@gmail.com> wrote:
> On Feb 12, 7:55 pm, Marko Topolnik <marko.topol...@gmail.com> wrote:
>
> > How about replacing
> >   (drop-last sibs)
> > with
> >   (remove vector? sibs)
> > ?
>
> This was slightly naive. We also need these changes:
>
> In siblings:
>
> :end-element   [[(rest s)]]
>
> In mktree:
>
> (cons
>           (struct element (:name elem) (:attrs elem) (remove vector?
> sibs))
>           (lazy-seq (get (last sibs) 0)))

-- 
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your 
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en

Reply via email to