On Sat, Oct 14, 2017 at 7:48 AM, Alexander Burger <a...@software-lab.de> wrote:
> You are close :)

Hi Alex,
Thanks, I'm making some progress at last!
A personal lesson:
when meta-programming, I should make more use of pp.

> I would do this:
>
>    (de decar Lst
>       (def (++ Lst)
>          (let Var (++ Lst)
>             (cons
>                Var
>                (list 'setq Var (list 'car Var))
>                Lst ) ) ) )

Thanks, it works at home too, but with pop instead of ++ (I'm using
EmuLisp). I just replaced (++ Lst) with (pop 'Lst).

I'm quite surprised of the use of setq instead of let.
Could you please elaborate?
More precisely, I would have thought that
(foo smthng) would have bound 'smthng to X.


chri

-- 
UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe

Reply via email to