all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
* bug#18390: 24.4.50; REGRESSION: `split-window' error
@ 2014-09-02 18:33 Drew Adams
  2014-09-02 21:44 ` Drew Adams
  2016-09-30 20:58 ` Alan Third
  0 siblings, 2 replies; 27+ messages in thread
From: Drew Adams @ 2014-09-02 18:33 UTC (permalink / raw)
  To: 18390

The regression was introduced after this build:

In GNU Emacs 24.4.50.1 (i686-pc-mingw32)
 of 2014-06-01 on ODIEONE
Repository revision: 117212 michael.albinus@gmx.de-20140601104945-g88x0mwrx=
orz302h
Windowing system distributor `Microsoft Corp.', version 6.1.7601
Configured using:
 `configure --prefix=3D/c/Devel/emacs/snapshot/trunk
 --enable-checking=3Dyes,glyphs 'CFLAGS=3D-O0 -g3'
 LDFLAGS=3D-Lc:/Devel/emacs/lib 'CPPFLAGS=3D-DGC_MCHECK=3D1
 -Ic:/Devel/emacs/include''

In GNU Emacs 24.4.50.1 (i686-pc-mingw32)
 of 2014-05-25 on ODIEONE
Repository revision: 117153 tsdh@gnu.org-20140525174054-vzeh4zeg00a1ley8
Windowing system distributor `Microsoft Corp.', version 6.1.7601
Configured using:
 `configure --prefix=3D/c/Devel/emacs/snapshot/trunk
 --enable-checking=3Dyes,glyphs 'CFLAGS=3D-O0 -g3'
 LDFLAGS=3D-Lc:/Devel/emacs/lib 'CPPFLAGS=3D-DGC_MCHECK=3D1
 -Ic:/Devel/emacs/include''

and before this build, one week later:

In GNU Emacs 24.4.50.1 (i686-pc-mingw32)
 of 2014-06-01 on ODIEONE
Repository revision: 117212 michael.albinus@gmx.de-20140601104945-g88x0mwrx=
orz302h
Windowing system distributor `Microsoft Corp.', version 6.1.7601
Configured using:
 `configure --prefix=3D/c/Devel/emacs/snapshot/trunk
 --enable-checking=3Dyes,glyphs 'CFLAGS=3D-O0 -g3'
 LDFLAGS=3D-Lc:/Devel/emacs/lib 'CPPFLAGS=3D-DGC_MCHECK=3D1
 -Ic:/Devel/emacs/include''

Recipe to repro:

1. emacs -Q

2. Load library hexrgb.el, then library palette.el. Both available from
   Emacs Wiki.
   http://www.emacswiki.org/emacs-en/download/hexrgb.el
   http://www.emacswiki.org/emacs-en/download/palette.el

3. M-x set-variable debug-on-error t RET

4. M-x palette RET RET ; Opens color palette for an arbitrary color.

5. You get this backtrace:

Debugger entered--Lisp error: (error "Window #<window 8 on Palette (Hue x S=
aturation)> too small for splitting 3")
  signal(error ("Window #<window 8 on Palette (Hue x Saturation)> too small=
 for splitting 3"))
  error("Window %s too small for splitting 3" #<window 8 on Palette (Hue x =
Saturation)>)
  byte-code("...
  split-window(#<window 8 on Palette (Hue x Saturation)> 100 t)
  (let* ((pop-up-frames t) (window-min-width 5) (fit-frame-inhibit-fitting-=
flag t) (temp-buffer-setup-hook nil) (temp-buffer-show-functions nil) (widt=
h 100) (height 100) (stringlen (* width height))) (set-buffer (get-buffer-c=
reate "Palette (Hue x Saturation)")) (make-variable-frame-local (quote 1on1=
-change-cursor-on-input-method-flag)) (modify-frame-parameters (make-frame =
(list (quote (menu-bar-lines . 0)) (quote (tool-bar-lines . 0)) (quote (lef=
t-fringe . 0)) (quote (right-fringe . 0)) (quote (fringe . 0)) (quote (heig=
ht . 100)) (quote (width . 115)) (quote (minibuffer)) (quote (vertical-scro=
ll-bars)) (quote (cursor-type . box)) (quote (background-color . "Black")) =
(quote (mouse-color . "Black")) (quote (cursor-color . "Black")) (cons (quo=
te font) palette-font))) (quote ((1on1-change-cursor-on-input-method-flag))=
)) (let* ((old-dir default-directory) (buf (save-current-buffer (set-buffer=
 (get-buffer-create "Palette (Hue x Saturation)")) (prog1 (current-buffer) =
(kill-all-local-variables) (setq default-directory old-dir) (setq buffer-re=
ad-only nil) (setq buffer-file-name nil) (setq buffer-undo-list t) (let (..=
. ...) (erase-buffer) (run-hooks ...))))) (standard-output buf)) (prog1 (pr=
ogn (let* ((cells (make-string stringlen 32)) (hue 0.999999) (sat 1.0) (ind=
ex 0) (col "#000000000000") (hhh 0) (sss 0)) (while (< index stringlen) (se=
tq sss 0) (while (< sss height) (setq hhh 0 hue 1.0) (while ... ... ... ...=
) (setq sat ... sss ...))) (set-buffer "Palette (Hue x Saturation)") (setq =
sss 0 index 0) (while (< sss height) (insert (substring cells index ...) 10=
) (setq sss (1+ sss) index (+ index width))))) (internal-temp-output-buffer=
-show buf))) (select-window (get-buffer-window "Palette (Hue x Saturation)"=
 (quote visible))) (set-window-dedicated-p (selected-window) t) (setq heade=
r-line-format nil window-size-fixed t) (palette-mode) (setq buffer-read-onl=
y t) (split-window (selected-window) width t) (palette-swatch) (palette-swa=
tch t) (split-window (selected-window) 10 t) (palette-brightness-scale) (se=
lect-window (get-buffer-window "Palette (Hue x Saturation)" (quote visible)=
)))
  palette("")
  funcall-interactively(palette "")
  call-interactively(palette record nil)
  command-execute(palette record)
  execute-extended-command(nil "palette")
  funcall-interactively(execute-extended-command nil "palette")
  call-interactively(execute-extended-command nil nil)
  command-execute(execute-extended-command)

6. I'm sorry to say that I tried to trace this, in detail, from the
   beginning (in `emacs -Q') using `debug-on-entry' for function
   `palette', and the error was not raised.  And yet the error is 100%
   reproducible...  Perhaps the debugger interacts in some way with
   the (window-splitting?) code.

Sorry, I don't have a simpler recipe than this.

In GNU Emacs 24.4.50.1 (i686-pc-mingw32)
 of 2014-08-15 on LEG570
Bzr revision: 117706 rgm@gnu.org-20140815043406-p5hbu97cbm7pulcn
Windowing system distributor `Microsoft Corp.', version 6.1.7601
Configured using:
 `configure --enable-checking 'CFLAGS=3D-O0 -g3' CPPFLAGS=3D-DGLYPH_DEBUG=
=3D1'





^ permalink raw reply	[flat|nested] 27+ messages in thread

end of thread, other threads:[~2022-05-25 12:16 UTC | newest]

Thread overview: 27+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2014-09-02 18:33 bug#18390: 24.4.50; REGRESSION: `split-window' error Drew Adams
2014-09-02 21:44 ` Drew Adams
2016-09-30 20:58 ` Alan Third
2016-09-30 21:12   ` Drew Adams
2016-09-30 21:33     ` Noam Postavsky
2016-09-30 22:39       ` Drew Adams
2016-10-01  0:12         ` npostavs
2016-10-01  0:43           ` Drew Adams
2016-10-01  7:46       ` Eli Zaretskii
2016-10-02 21:03       ` Drew Adams
2016-10-01  7:44     ` Eli Zaretskii
2016-10-01 13:01       ` Alan Third
2016-10-01 15:44         ` Eli Zaretskii
2016-10-01 16:20           ` Alan Third
2016-10-02 21:03           ` Drew Adams
2016-10-02 22:33             ` Drew Adams
2016-10-03  6:39             ` Eli Zaretskii
2016-10-03 18:34               ` Noam Postavsky
2016-10-03 19:42                 ` Drew Adams
2016-10-04 20:52                   ` Noam Postavsky
2016-10-04 20:58                     ` Drew Adams
2016-10-04 21:15                       ` Noam Postavsky
2016-10-04 23:19                         ` Drew Adams
2022-04-26 12:54                           ` bug#18390: [w32] " Lars Ingebrigtsen
2022-05-25 12:16                             ` Lars Ingebrigtsen
     [not found]   ` <<901673d8-75c2-494f-956d-9f938a8e87b4@default>
     [not found]     ` <<83a8eoms29.fsf@gnu.org>
2016-10-02 21:03       ` bug#18390: " Drew Adams
2016-10-03  6:16         ` Eli Zaretskii

Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/emacs.git
	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.