Re: make check fails in latest CVS.

This seems wierd. If this has just started happening can you try undoing my patch to Fwindow_height and see if that fixes things. I don't see how tit could get to be unbound..... andy At 02:12 AM 1/15/00 -0800, Martin Buchholz wrote: ((w)->gutter_border_width[pos])) ((w)->gutter_border_width[pos])) assertion failed, file /xemacs/ws/dev/src/lisp.h, line 1292, INTP (obj) "/xemacs/ws/dev/src/lisp.h", line=1292, expr=0x8210643 "INTP (obj)") at /xemacs/ws/dev/src/emacs.c:2833 /xemacs/ws/dev/src/window.c:1016 pixel_height=9, include_gutters_p=0) at /xemacs/ws/dev/src/window.c:3584 /xemacs/ws/dev/src/window.c:3636 /xemacs/ws/dev/src/window.c:1300 /xemacs/ws/dev/src/eval.c:3175 last-nonminibuf-frame selected-frame get-buffer buffer bufferp wrong-type-argument pre-display-buffer-function not-this-window-p override-frame display-buffer-function throw done buffer-dedicated-frame dedi frame-live-p window-buffer selected-window display-buffer-1 buffer-name same-window-buffer-names assoc switch-to-buffer same-window-regexps tem car string-match pop-up-frames 0 get-buffer-window special-display-function special-display-buffer-names special-display-regexps frame-selected-window pop-up-frame-function set-window-buffer pop-up-windows frame-property minibuffer only window-dedicated-p frame-root-window split-height-threshold window-min-height split-width-threshold window-min-width ...] 7) (backquote ...)) (defmacro Check-Error (expected-error &rest body) (let ... ...)) (defmacro Check-Error-Message (expected-error expected-error-regexp &rest body) (let ... ...)) (defmacro Check-Message (expected-message-regexp &rest body) (let ... ...)) (defmacro Ignore-Ebola (&rest body) (backquote ...)) (defun Int-to-Marker (pos) (save-excursion ... ...)) (princ "Testing Interpreted Lisp\n\n") (condition-case error-info (funcall ...) (error ... ... ... ...)) (princ "\nTesting Compiled Lisp\n\n") (let (code) (condition-case error-info ... ...) (condition-case error-info ... ...)) (princ "\nSUMMARY:\n") (princ (format " %5d passes\n" passes)) (princ (format " %5d assertion failures\n" assertion-failures)) (princ (format " %5d errors that should have been generated, but weren't\n" no-error-failures)) (princ (format " %5d wrong-error failures\n" wrong-error-failures)) (princ (format " %5d missing-message failures\n" missing-message-failures)) (princ (format " %5d other failures\n" other-failures)) (let* (... ... ...) (message "%s" summary-msg)) (when unexpected-test-suite-failure (message "Test suite execution failed unexpectedly.")) (fmakunbound (quote Assert)) (fmakunbound (quote Check-Error)) (fmakunbound (quote Ignore-Ebola)) (fmakunbound (quote Int-to-Marker))) other-failures missing-message-failures wrong-error-failures no-error-failures assertion-failures passes) (wrong-error-failures 0) (missing-message-failures 0) (other-failures 0) (trick-optimizer nil) (unexpected-test-suite-failure nil) (debug-on-error t)) (with-output-to-temp-buffer "*Test-Log*" (defmacro Assert ... ...) (defmacro Check-Error ... ...) (defmacro Check-Error-Message ... ...) (defmacro Check-Message ... ...) (defmacro Ignore-Ebola ... ...) (defun Int-to-Marker ... ...) (princ "Testing Interpreted Lisp\n\n") (condition-case error-info ... ...) (princ "\nTesting Compiled Lisp\n\n") (let ... ... ...) (princ "\nSUMMARY:\n") (princ ...) (princ ...) (princ ...) (princ ...) (princ ...) (princ ...) (let* ... ...) (when unexpected-test-suite-failure ...) (fmakunbound ...) (fmakunbound ...) (fmakunbound ...) (fmakunbound ...))) "/xemacs/build/ud9/tests/automated/base64-tests.el") (setq input-buffer ...) (set-buffer input-buffer) (erase-buffer) (insert-file-contents filename) (let ... ... ...)) (test-harness-from-buffer input-buffer filename) (kill-buffer input-buffer)) (princ file) (princ ": ") (display-error error-info nil) (terpri) nil))) (princ ">>Error occurred processing ") (princ file) (princ ": ") (display-error error-info nil) (terpri) nil)) (or (batch-test-emacs-1 file-in-dir) (setq error t))) (or (batch-test-emacs-1 file-in-dir) (setq error t))) --dolist-temp--15901)) (when (and ... ...) (or ... ...)) (setq --dolist-temp--15901 (cdr --dolist-temp--15901))) --dolist-temp--15901 (setq file-in-dir ...) (when ... ...) (setq --dolist-temp--15901 ...)) nil) --dolist-temp--15901 ... ... ...) nil)) ...) nil)) ... ...))) (or (batch-test-emacs-1 file) (setq error t))) (file-directory-p file) (dolist ... ...) (or ... ...)) (setq --dolist-temp--15900 (cdr --dolist-temp--15900))) --dolist-temp--15900 (setq file ...) (if ... ... ...) (setq --dolist-temp--15900 ...)) nil) --dolist-temp--15900 ... ... ...) nil)) (dolist ... ...) (or ... ...))) ...)) (message "Done") (kill-emacs (if error 1 0))) tem) "/xemacs/ws/dev/src/lisp.h", line=1292, expr=0x8210643 "INTP (obj)") at /xemacs/ws/dev/src/emacs.c:2833 /xemacs/ws/dev/src/window.c:1016 pixel_height=9, include_gutters_p=0) at /xemacs/ws/dev/src/window.c:3584 /xemacs/ws/dev/src/window.c:3636 /xemacs/ws/dev/src/window.c:1300 /xemacs/ws/dev/src/eval.c:3175 /xemacs/ws/dev/src/window.c:1016 lisp_readonly = 0}, next = 0x82e14c8, uid = 777, free = 0}, frame = {...}, mini_p = {...}, next = {...}, prev = {...}, hchild = {...}, vchild = {...}, parent = {...}, pixel_left = 0, pixel_top = 0, pixel_height = 9, pixel_width = 10, buffer = {...}, start = {{...}, {...}, {...}}, pointm = {{...}, {...}, {...}}, sb_point = {...}, hscroll = 0, modeline_hscroll = 0, top_yoffset = 0, left_xoffset = 0, use_time = {...}, last_modified = {{...}, {...}, {...}}, last_point = {{...}, {...}, {...}}, last_start = {{...}, {...}, {...}}, last_facechange = {{...}, {...}, {...}}, face_cachels = 0x0, glyph_cachels = 0x0, subwindow_instance_cache = {...}, line_start_cache = 0x0, line_cache_last_updated = {...}, line_cache_validation_override = 0, max_line_len = 0, last_point_x = {0, 0, 0}, last_point_y = {0, 0, 0}, window_end_pos = {0, 0, 0}, redisplay_end_trigger = {...}, last_redisplay_pos = 0, dedicated = {...}, display_table = {...}, modeline_shadow_thickness = {...}, has_modeline_p = {...}, vertical_divider_shadow_thickness = {...}, vertical_divider_line_width = {...}, vertical_divider_spacing = {...}, vertical_divider_always_visible_p = {...}, scrollbar_width = {...}, scrollbar_height = {...}, horizontal_scrollbar_visible_p = {...}, vertical_scrollbar_visible_p = {...}, scrollbar_on_left_p = {...}, scrollbar_on_top_p = {...}, scrollbar_pointer = {...}, toolbar = {{...}, {...}, {...}, {...}}, toolbar_size = {{...}, {...}, {...}, {...}}, toolbar_border_width = {{...}, {...}, {...}, {...}}, toolbar_visible_p = {{...}, {...}, {...}, {...}}, toolbar_buttons_captioned_p = {...}, default_toolbar = {...}, default_toolbar_width = {...}, default_toolbar_height = {...}, default_toolbar_visible_p = {...}, default_toolbar_border_width = {...}, gutter = {{...}, {...}, {...}, {...}}, gutter_size = {{...}, {...}, {...}, {...}}, real_gutter_size = {{...}, {...}, {...}, {...}}, gutter_border_width = {{...}, {...}, {...}, {...}}, gutter_visible_p = {{...}, {...}, {...}, {...}},fault_gutter = {...}, default_gutter_width = {...}, default_gutter_height = {...}, default_gutter_visible_p = {...}, default_gutter_border_width = {...}, left_margin_width = {...}, right_margin_width = {...}, minimum_line_ascent = {...}, minimum_line_descent = {...}, use_left_overflow = {...}, use_right_overflow = {...}, menubar_visible_p = {...}, text_cursor_visible_p = {...}, config_mark = 0, dead = 0, force_start = 0, redo_modeline = 0, start_at_line_beg = 1, windows_changed = 1, shadow_thickness_changed = 1, need_vertical_divider_p = 0, need_vertical_divider_valid_p = 0} lisp_readonly = 0}, next = 0x0, uid = 69, free = 0}, type = SYMVAL_UNBOUND_MARKER}, magicfun = 0x1} -------------------------------------------------------------- Dr Andy Piper Senior Consultant Architect, BEA Systems Ltd