bug#4737: 23.1.50; C-j in *scratch* after a hash table constant errors with void-function

bug#4737: 23.1.50; C-j in *scratch* after a hash table constant errors with void-function

[Aidan Kehoe]

Hello!

Please write in English if possible, because the Emacs maintainers
usually do not have translators to read other languages for them.

Your bug report will be posted to the emacs-pretest-bug@gnu.org mailing list.

Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:

In *scratch*: 

(progn
  (setq print-length nil)
  (make-hash-table)) 
=> #s(hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8 data ())

#s(hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8 data
 ())
=> 
Debugger entered--Lisp error: (void-function hash-table)
  (hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8 data nil)
  eval((hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8 data nil))
  eval-last-sexp-1(t)
  eval-last-sexp(t)
  eval-print-last-sexp()
  call-interactively(eval-print-last-sexp nil nil)

However, this succeeds: 

(car (list
      #s(hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8 data ())))
=> #s(hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8 data ())

XEmacs handles the problem in #'forward-sexp, details here: 

http://hg.debian.org/hg/xemacs/xemacs/file/a27de91ae83c/lisp/lisp.el#l55

When I use the XEmacs version of #'forward-sexp, the problem goes away. 

Goodbye, 

Aidan

If Emacs crashed, and you have the Emacs process in the gdb debugger,
please include the output from the following gdb commands:
    `bt full' and `xbacktrace'.
If you would like to further debug the crash, please read the file
/Sources/emacs/nextstep/Emacs.app/Contents/Resources/etc/DEBUG for instructions.


In GNU Emacs 23.1.50.1 (i386-apple-darwin8.11.1, NS apple-appkit-824.48)
 of 2009-09-30 on bonbon
Windowing system distributor `Apple', version 10.3.824
configured using `configure  '--with-ns' '--enable-asserts' '--enable-maintainer-mode' '--enable-cocoa-experimental-ctrl-g' '--with-xpm' '--with-jpeg' '--with-tiff' '--with-png' 'LDFLAGS=-L/opt/local/lib -L/usr/X11R6/lib -L/usr/local/lib' 'CPPFLAGS=-I/opt/local/include -I/usr/X11R6/include -I/usr/local/include''

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: de_DE.UTF-8
  value of $XMODIFIERS: nil
  locale-coding-system: utf-8-unix
  default-enable-multibyte-characters: t

Major mode: Lisp Interaction

Minor modes in effect:
  tooltip-mode: t
  mouse-wheel-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  global-auto-composition-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t
  line-number-mode: t
  transient-mark-mode: t

Recent input:
C-n C-n C-n C-n C-n C-n C-n C-n C-n C-n C-n C-n C-n 
C-n C-n C-n C-n C-n C-n C-n C-v C-v C-v C-v C-v C-v 
C-v C-v C-v C-v <escape> v C-v C-v C-v C-v C-v <prior> 
<next> <next> <prior> <prior> <prior> <prior> <prior> 
<prior> <prior> <prior> <prior> C-x b * s c <tab> <return> 
( k i l l e C-a C-k <f1> v p r i n t - l e <tab> n 
<tab> <return> C-x o C-n C-n C-n C-n C-n C-e C-b C-b 
C-b C-b <return> C-x o C-n C-x o C-e C-b C-b C-b <return> 
C-x o C-x b * s c <tab> C-g C-x o C-n C-n C-x o C-x 
b * s c <tab> <return> <escape> > <return> <return> 
( s e t q SPC e v a l - e x p r e s s i o n - p r i 
n t - l e n g t h SPC n i l ) C-j C-p C-p C-p C-p C-p 
C-p C-e C-j C-p C-d C-d ( l e n g t h SPC ' C-e ) C-j 
C-x o C-x o C-p C-p C-n C-n C-n C-p C-p C-p C-p C-k 
C-k C-k C-p C-e C-j C-p C-e C-j q <escape> x r e p 
o r t - e m a c s - b u g C-g C-p <return> <return> 
C-p ( c o n s SPC . C-a ( c a r SPC C-e C-n C-e <backspace> 
) <return> <tab> n i l ) ) C-j C-x o C-p C-p C-f C-f 
C-f C-f C-f C-f C-f C-f C-d C-n C-n C-j C-x o q <escape> 
x r e p o r t - e m a c s - b u g <return>

Recent messages:
Making completion list...
Type C-x 1 to delete the help window.
uncompressing simple.el.gz...done
Quit
Mark set
Entering debugger...
Back to top level.
Quit
Entering debugger...
Back to top level.

-- 
¿Dónde estará ahora mi sobrino Yoghurtu Nghe, que tuvo que huir
precipitadamente de la aldea por culpa de la escasez de rinocerontes?

bug#4737: marked as done (23.1.50; C-j in *scratch* after a hash table constant errors with void-function )

[Emacs bug Tracking System]

[-- Attachment #1: Type: text/plain, Size: 959 bytes --]

Your message dated Sun, 18 Oct 2009 18:28:32 -0400
with message-id <87vdic49rj.fsf@stupidchicken.com>
and subject line Re: bug#4737: 23.1.50; C-j in *scratch* after a hash table constant errors with void-function
has caused the Emacs bug report #4737,
regarding 23.1.50; C-j in *scratch* after a hash table constant errors with void-function 
to be marked as done.

This means that you claim that the problem has been dealt with.
If this is not the case it is now your responsibility to reopen the
bug report if necessary, and/or fix the problem forthwith.

(NB: If you are a system administrator and have no idea what this
message is talking about, this may indicate a serious mail system
misconfiguration somewhere. Please contact owner@emacsbugs.donarmstrong.com
immediately.)


-- 
4737: http://emacsbugs.donarmstrong.com/cgi-bin/bugreport.cgi?bug=4737
Emacs Bug Tracking System
Contact owner@emacsbugs.donarmstrong.com with problems

[-- Attachment #2: Type: message/rfc822, Size: 6429 bytes --]

From: Aidan Kehoe <kehoea@parhasard.net>
To: emacs-pretest-bug@gnu.org
Subject: 23.1.50; C-j in *scratch* after a hash table constant errors with void-function
Date: Fri, 16 Oct 2009 15:40:12 +0100
Message-ID: <19160.34252.908907.763006@parhasard.net>


Hello!

Please write in English if possible, because the Emacs maintainers
usually do not have translators to read other languages for them.

Your bug report will be posted to the emacs-pretest-bug@gnu.org mailing list.

Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:

In *scratch*: 

(progn
  (setq print-length nil)
  (make-hash-table)) 
=> #s(hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8 data ())

#s(hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8 data
 ())
=> 
Debugger entered--Lisp error: (void-function hash-table)
  (hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8 data nil)
  eval((hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8 data nil))
  eval-last-sexp-1(t)
  eval-last-sexp(t)
  eval-print-last-sexp()
  call-interactively(eval-print-last-sexp nil nil)

However, this succeeds: 

(car (list
      #s(hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8 data ())))
=> #s(hash-table size 65 test eql rehash-size 1.5 rehash-threshold 0.8 data ())

XEmacs handles the problem in #'forward-sexp, details here: 

http://hg.debian.org/hg/xemacs/xemacs/file/a27de91ae83c/lisp/lisp.el#l55

When I use the XEmacs version of #'forward-sexp, the problem goes away. 

Goodbye, 

Aidan

If Emacs crashed, and you have the Emacs process in the gdb debugger,
please include the output from the following gdb commands:
    `bt full' and `xbacktrace'.
If you would like to further debug the crash, please read the file
/Sources/emacs/nextstep/Emacs.app/Contents/Resources/etc/DEBUG for instructions.


In GNU Emacs 23.1.50.1 (i386-apple-darwin8.11.1, NS apple-appkit-824.48)
 of 2009-09-30 on bonbon
Windowing system distributor `Apple', version 10.3.824
configured using `configure  '--with-ns' '--enable-asserts' '--enable-maintainer-mode' '--enable-cocoa-experimental-ctrl-g' '--with-xpm' '--with-jpeg' '--with-tiff' '--with-png' 'LDFLAGS=-L/opt/local/lib -L/usr/X11R6/lib -L/usr/local/lib' 'CPPFLAGS=-I/opt/local/include -I/usr/X11R6/include -I/usr/local/include''

Important settings:
  value of $LC_ALL: nil
  value of $LC_COLLATE: nil
  value of $LC_CTYPE: nil
  value of $LC_MESSAGES: nil
  value of $LC_MONETARY: nil
  value of $LC_NUMERIC: nil
  value of $LC_TIME: nil
  value of $LANG: de_DE.UTF-8
  value of $XMODIFIERS: nil
  locale-coding-system: utf-8-unix
  default-enable-multibyte-characters: t

Major mode: Lisp Interaction

Minor modes in effect:
  tooltip-mode: t
  mouse-wheel-mode: t
  menu-bar-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  font-lock-mode: t
  global-auto-composition-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t
  line-number-mode: t
  transient-mark-mode: t

Recent input:
C-n C-n C-n C-n C-n C-n C-n C-n C-n C-n C-n C-n C-n 
C-n C-n C-n C-n C-n C-n C-n C-v C-v C-v C-v C-v C-v 
C-v C-v C-v C-v <escape> v C-v C-v C-v C-v C-v <prior> 
<next> <next> <prior> <prior> <prior> <prior> <prior> 
<prior> <prior> <prior> <prior> C-x b * s c <tab> <return> 
( k i l l e C-a C-k <f1> v p r i n t - l e <tab> n 
<tab> <return> C-x o C-n C-n C-n C-n C-n C-e C-b C-b 
C-b C-b <return> C-x o C-n C-x o C-e C-b C-b C-b <return> 
C-x o C-x b * s c <tab> C-g C-x o C-n C-n C-x o C-x 
b * s c <tab> <return> <escape> > <return> <return> 
( s e t q SPC e v a l - e x p r e s s i o n - p r i 
n t - l e n g t h SPC n i l ) C-j C-p C-p C-p C-p C-p 
C-p C-e C-j C-p C-d C-d ( l e n g t h SPC ' C-e ) C-j 
C-x o C-x o C-p C-p C-n C-n C-n C-p C-p C-p C-p C-k 
C-k C-k C-p C-e C-j C-p C-e C-j q <escape> x r e p 
o r t - e m a c s - b u g C-g C-p <return> <return> 
C-p ( c o n s SPC . C-a ( c a r SPC C-e C-n C-e <backspace> 
) <return> <tab> n i l ) ) C-j C-x o C-p C-p C-f C-f 
C-f C-f C-f C-f C-f C-f C-d C-n C-n C-j C-x o q <escape> 
x r e p o r t - e m a c s - b u g <return>

Recent messages:
Making completion list...
Type C-x 1 to delete the help window.
uncompressing simple.el.gz...done
Quit
Mark set
Entering debugger...
Back to top level.
Quit
Entering debugger...
Back to top level.

-- 
¿Dónde estará ahora mi sobrino Yoghurtu Nghe, que tuvo que huir
precipitadamente de la aldea por culpa de la escasez de rinocerontes?


[-- Attachment #3: Type: message/rfc822, Size: 2204 bytes --]

From: Chong Yidong <cyd@stupidchicken.com>
To: Stefan Monnier <monnier@iro.umontreal.ca>
Cc: 4737-done@emacsbugs.donarmstrong.com, Aidan Kehoe <kehoea@parhasard.net>
Subject: Re: bug#4737: 23.1.50; C-j in *scratch* after a hash table constant errors with void-function
Date: Sun, 18 Oct 2009 18:28:32 -0400
Message-ID: <87vdic49rj.fsf@stupidchicken.com>

Stefan Monnier <monnier@iro.umontreal.ca> writes:

>> + 	;; Skip over hash table read syntax
>> + 	(when (looking-back "#s")
>> + 	  (forward-char -2))
>
> Calling looking-back without a limit argument is asking for trouble (it
> has complexity O(size of buffer) or worse).

I've checked in the patch, with a limit argument.  Thanks for pointing
this out.