bug#6214: 23.1; json-read-string crashes emacs with long string

[Leo]

On 2010-05-18 17:08 +0100, Carl Worth wrote:
> ;; Caution: Evaluating the block below has been known to crash emacs
> (with-temp-buffer
>   (require 'json)
>   ;; First we just need a lot of text. 32 copies of GPLv3 seems to do it
>   (dotimes (i 32)
>     (insert-file "/usr/share/emacs/23.1/etc/COPYING"))
>   ;; Now create a buffer with a json-encoded version of the text
>   (let ((json-string (json-encode-string (buffer-string))))
>     (with-temp-buffer
>       (insert json-string)
>       (goto-char (point-min))
>       ;; And try to read the string. This triggers the segfault.
>       (json-read-string))))

Crash emacs 23.2 too.

Leo