[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: simple... bug?
From: |
Alan Mackenzie |
Subject: |
Re: simple... bug? |
Date: |
Tue, 14 Oct 2003 08:46:32 +0000 |
User-agent: |
tin/1.4.5-20010409 ("One More Nightmare") (UNIX) (Linux/2.0.35 (i686)) |
Joe Corneli <jcorneli@math.utexas.edu> wrote on Tue, 14 Oct 2003 02:17:11
-0500:
> (defun squares (list-of-numbers)
> (let ((list-of-squares nil)
> (i 0)
> (L (length list-of-numbers)))
> (while (< i L)
> (setq list-of-squares (append list-of-squares
> (list (* (nth i list-of-numbers)
> (nth i
> list-of-numbers)))))
> (setq i (1+ i))))
> list-of-squares)
> For
> (squares '(2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79
> 83 89 97))
> I get
> *
> (4 9 9 25 49 121 169 289 361 529 841 961 1369 1681 1849 2209 2809 3481
> 3721 4489 5041 5329 6241 6889 7921 9409)
> Emacs is 21.3.1
> OS is Mac OS X 10.3
> Am I making some _extremely_ subtle mistake?
What on earth is the value "list-of-squares" that you're returning? It's
not the one you bound in the "let" form. :-)
Hey, I do things like this too. It makes me feel really stupid.
Something I've done approximately three times in the last three months is
to write this form:
(\= (point) here)
It didn't do what I wanted. But thank goodness for edebug. :-(
> Joe
--
Alan Mackenzie (Munich, Germany)
Email: aacm@muuc.dee; to decode, wherever there is a repeated letter
(like "aa"), remove half of them (leaving, say, "a").