Hi all,
Code snippet below works, but is it correct? Or success through luck?
We could of course look at this on PilCon tomorrow,
I would try to post the answer in the list afterwards.
Any links to existing docs are also welcome - i did not know what idioms
to look for.
----
(setq l-1-1 '(a b c d))
(setq l-1-2 '(1 2 3 4))
Want to access symbols by composing their names in a loop:
(for N 2
(let Tok (intern (pack "l-1-" N))
(prinl
"2nd item of " Tok ": "
(car (nth (val Tok) 2)) ) ) )
#+OUTPUT:
2nd item of l-1-1:b
2nd item of l-1-2:2
----
I expected
(car (nth Tok 2))
to return second element,
but had to insert 'val to return the expected value:
(car (nth (val Tok) 2))
Is this picolisp used correctly?
Kind Regards,
Olaf
--
UNSUBSCRIBE: mailto:picolisp@software-lab.de?subject=Unsubscribe
