Re: Subject: Re: Emacs CVS loops on evaluation of badly formed Elisp code

[Juri Linkov]

> 1) Start with emacs -Q
> 2) Put this code in a buffer:
>
> (defun url-dl-callback-save(to-file url)
>  (when (= 0 (buffer-size)) (url-dl-do-redir)))
>  (goto-char (point-min))
>  (let ((redirsts (search-forward-regexp 
> "\\(300\\|301\\|302\\|307\\|303\\)" 20 t)))
>    ))
>
> 3) M-x eval-buffer
>
> => Emacs loops.

No wonder that it loops.  Due to unbalanced parenthesis
`(goto-char (point-min))' is on top level, so reading restarts
from the top after it reaches that line.

-- 
Juri Linkov
http://www.jurta.org/emacs/