Re: Lisp Live buffer

[Emanuel Berg]

> (defun make-world (dim len &optional init)
>   (or init (setq init "."))
>   (if (zerop dim)
>       init
>     (make-list len (make-world (1- dim) len init)) ))

So it was this part ...

Have a look, it's the same same list list!

(let ((lst (make-list 3 (list 1 2 3))))
  (setf (nth 2 (nth 1 lst)) 0)
  lst)

-> ((1 2 0) (1 2 0) (1 2 0))

$&#@%!

https://dataswamp.org/~incal/emacs-init/comic-book-insult.el

-- 
underground experts united
https://dataswamp.org/~incal