Re: untabify works no more
25 years, 1 month
Michael Sperber
Michael Sperber
>>>>> "GB" == giacomo boffi <giacomo.boffi(a)polimi.it> writes:
GB> Michael Sperber [Mr. Preprocessor] writes:
>>
>> Has anyone noticed?
GB> yes
The reason is with the interaction between byte-code and C. tabify.el
has:
(defun untabify (start end)
"Convert all tabs in region to multiple spaces, preserving columns.
Called non-interactively, the region is specified by arguments
START and END, rather than by the position of point and mark.
The variable `tab-width' controls the spacing of tab stops."
(interactive "r")
(save-excursion
(save-restriction
(narrow-to-region (point-min) end)
(goto-char start)
(let ((percent 5))
(while (search-forward "\t" nil t) ; faster than re-search
(let ((tab-beg (point))
(column (current-column))
(indent-tabs-mode nil))
^^^^^^^^^^^^^^^^^^^^
But `indent-tabs-mode''s C pendant from indent.c:
DEFVAR_BOOL ("indent-tabs-mode", &indent_tabs_mode /*
*Indentation can insert tabs if this is non-nil.
Setting this variable automatically makes it local to the current buffer.
*/ );
indent_tabs_mode = 1;
appears unruffled during the execution of `indent-to'. I read through
the huge fuckup of code off specpdl and gave up at some point.
--
Cheers =8-} Mike
Friede, Völkerverständigung und überhaupt blabla
- 1 participants
- 0 comments
XEmacs 21.2-b33 crash on buffers menu
25 years, 1 month
Luc Claeys
Luc Claeys
Hi, Thanks for Making and Maintaining XEmacs !!!
In XEmacs 21.2 (beta33) "Melpomene" [Lucid] (i686-pc-linux) of Sat May 27 2000 on ark
configured using `configure --prefix=/usr/local/src/xemacs-21 --verbose'
Please describe exactly what actions triggered the bug
and the precise symptoms of the bug:
Systematic crash when doing
C-M Right-Button
to get buffers-popup-menu and RELEASING THE BUTTON OUTSIDE THE MENU.
happens also without .emacs file
xemacs -q
=======================================
Lisp backtrace follows:
# (condition-case ... . error)
# (catch top-level ...)
=========== Stacktrace ==============
> gdb /usr/local/bin/xemacs core
(gdb) where
#0 0x403dac11 in __kill () from /lib/libc.so.6
#1 0x80b4574 in fatal_error_signal (sig=6) at emacs.c:293
#2 0x403dab18 in __restore () at ../sysdeps/unix/sysv/linux/i386/sigaction.c:125
#3 0x403dc053 in abort () at ../sysdeps/generic/abort.c:88
#4 0x80b44b5 in assert_failed (file=0x8200ec6 "lisp.h", line=589,
expr=0x8200ea0 "RECORD_TYPEP (obj, lrecord_type_cons)") at emacs.c:2754
#5 0x80d8e54 in popup_selection_callback (widget=0x85d6dc8, ignored_id=65545,
client_data=0xffffffff) at lisp.h:589
#6 0x80d523f in popup_menu_down_callback (widget=0x85d6dc8, id=65545, client_data=0x0)
at menubar-x.c:664
#7 0x81d4add in pick_hook (w=0x85d6dc8, client_data=0x856fd18, call_data=0x8568b90)
at lwlib-Xlw.c:113
#8 0x401dc104 in XtCallCallbackList () from /usr/X11R6/lib/libXt.so.6
#9 0x81d36fe in Select (w=0x85d6dc8, ev=0xbffff1a8, params=0x0, num_params=0x402182d4)
at xlwmenu.c:3395
#10 0x4020a9dd in HandleActions () from /usr/X11R6/lib/libXt.so.6
#11 0x4020aec9 in HandleSimpleState () from /usr/X11R6/lib/libXt.so.6
#12 0x4020b411 in _XtTranslateEvent () from /usr/X11R6/lib/libXt.so.6
#13 0x401e72bf in XtDispatchEventToWidget () from /usr/X11R6/lib/libXt.so.6
#14 0x401e7cfd in _XtDefaultDispatcher () from /usr/X11R6/lib/libXt.so.6
#15 0x401e7f75 in XtDispatchEvent () from /usr/X11R6/lib/libXt.so.6
#16 0x401f2ca5 in XtAppProcessEvent () from /usr/X11R6/lib/libXt.so.6
#17 0x81a4d9e in emacs_Xt_next_event (emacs_event=0x853001c) at event-Xt.c:2592
#18 0x80e9d7d in event_stream_next_event (event=0x853001c) at event-stream.c:508
#19 0x80eb9e0 in next_event_internal (target_event=139657244, allow_queued=1) at event-stream.c:1967
#20 0x80ebfcf in Fnext_event (event=139657244, prompt=136880404) at event-stream.c:2181
#21 0x809a9af in Fcommand_loop_1 () at cmdloop.c:566
#22 0x809ac5e in command_loop_1 (dummy=136880404) at cmdloop.c:490
#23 0x80bf0c6 in condition_case_1 (handlers=136880500, bfun=0x809ac24 <command_loop_1>,
barg=136880404, hfun=0x809acd0 <cmd_error>, harg=136880404) at eval.c:1644
#24 0x809adc7 in command_loop_2 (dummy=136880404) at cmdloop.c:252
#25 0x80bef8c in internal_catch (tag=136952164, func=0x809ad8c <command_loop_2>, arg=136880404,
threw=0x0) at eval.c:1310
#26 0x809a2da in initial_command_loop (load_me=136880404) at cmdloop.c:301
#27 0x80b27f5 in xemacs_21_2_b33_i686_pc_linux (argc=2, argv=0xbffff784, envp=0xbffff790, restart=0)
at emacs.c:1873
#28 0x80b478f in main (argc=2, argv=0xbffff784, envp=0xbffff790) at emacs.c:2292
#29 0x403d4313 in __libc_start_main (main=0x80b4690 <main>, argc=2, argv=0xbffff784,
init=0x807e36c <_init>, fini=0x81e3390 <_fini>, rtld_fini=0x4000ac70 <_dl_fini>,
stack_end=0xbffff77c) at ../sysdeps/generic/libc-start.c:90
(gdb)
============== M-x describe-installation ============================
uname -a: Linux ark 2.2.14 #6 Tue Feb 8 20:09:33 CET 2000 i686 unknown
./configure '--prefix=/usr/local/src/xemacs-21' '--verbose'
XEmacs 21.2-b33 "Melpomene" configured for `i686-pc-linux'.
Compilation / Installation:
Source code location: /usr/local/src/xemacs-21/src/xemacs-21.2-b33
Installation prefix: /usr/local/src/xemacs-21
Operating system description file: `s/linux.h'
Machine description file: `m/intel386.h'
Compiler: gcc -g -O3 -Wall -Wno-switch -Wpointer-arith -Winline -Wmissing-prototypes -Wshadow
Relocating allocator for buffers: no
GNU version of malloc: yes
- Using Doug Lea's new malloc from the GNU C Library.
Window System:
Compiling in support for the X window system:
- X Windows headers location: /usr/X11/include
- X Windows libraries location: /usr/X11/lib
- Handling WM_COMMAND properly.
Compiling in support for the Athena widget set:
- Athena headers location: X11/Xaw
- Athena library to link: Xaw
Using Lucid menubars.
Using Lucid scrollbars.
Using Motif dialog boxes.
Using Motif native widgets.
TTY:
Compiling in support for ncurses.
Compiling in support for GPM (General Purpose Mouse).
Images:
Compiling in support for GIF images (builtin).
Compiling in support for XPM images.
Compiling in support for PNG images.
Compiling in support for TIFF images.
Sound:
Compiling in support for sound (native).
Compiling in support for ESD (Enlightened Sound Daemon).
Databases:
Compiling in support for Berkeley database.
Compiling in support for GNU DBM.
Compiling in support for LDAP.
Internationalization:
Mail:
Compiling in support for "dot-locking" mail spool file locking method.
Other Features:
Compiling in support for dynamic shared object modules.
Clash detection will use "${statedir}/${inststaticdir}/lock" for locking files.
Compiling in support for extra debugging code.
WARNING: ---------------------------------------------------------
WARNING: Compiling in support for runtime error checking.
WARNING: XEmacs will run noticeably more slowly as a result.
WARNING: Error checking is on by default for XEmacs beta releases.
WARNING: ---------------------------------------------------------
=============================================== (other XEmacs instance)
Recent keystrokes:
button1up RET right right right right right right right
right right right right right right right right right
right right right right left RET DEL DEL DEL end .
RET RET W o r k s SPC e BS BS BS BS BS BS BS BS t e
s t e d SPC w i t h SPC button2 button2up left left
left C-DEL left left left left left left left left
left BS RET SPC SPC down RET m o r e SPC i n f o r
m a t i o n : RET button1 button1up misc-user
Recent messages (most recent first):
Loading emacsbug...done
Loading emacsbug...
Loading efs-cu...done
Loading efs-cu...
Compose with ~
Type C-c C-x C-z to exit MIME mode, and type C-c C-x ? to get help.
Loading vm-folder...done
Loading vm-folder...
Parsing /home/lcl/.mailrc... done
Parsing /home/lcl/.mailrc...
- 1 participants
- 0 comments
(require 'compile) causes (end-of-file "internal input stream") in native NT 21.1.10
25 years, 1 month
Adrian Aichner
Adrian Aichner
Late breaking news on the matter:
Doing
(require 'compile)
in
xemacs-21.1.10.exe -vanilla
causes following error:
Signaling: (end-of-file "internal input stream")
load-internal("compile" nil t nil binary)
load("compile" nil t nil)
require(compile)
I spent a lot of weekend to debug this.
Finally I had the idea to
#define ENCAPSULATE_CLOSE
in nt\config.h and rebuild XEmacs.
Setting a breakpoint in sys_close revealed that
/* Close all descriptors in use for Fload_internal.
This is used when starting a subprocess. */
void
close_load_descs (void)
{
Lisp_Object tail;
LIST_LOOP (tail, Vload_descriptor_list)
close (XINT (XCAR (tail)));
}
called by Fcall_process_internal is closing the fd of compile.el[1],
causing the error above.
Commenting out the call to
close_load_descs()
in
Fcall_process_internal
makes the error going away.
I haven't seen any averse effect of leaving these fd's open.
The problem is not really fixed in 21.2-b33.
It does not show up there because the renamed
Fold_call_process_internal is only used under these circumstances:
(if (or (noninteractive) (not (eq 'windows-nt system-type)))
(apply 'old-call-process-internal program infile buffer display args)
What do the Windows process-experts suggest to fix this for 21.1.x?
Best regards,
Adrian
Footnotes:
[1] I have moved compile.elc out of the way temporarily.
--
Adrian Aichner <adrian(a)xemacs.org>
- 1 participants
- 0 comments
Re: set-window-configuration vs error-checking sub windows
25 years, 1 month
Jan Vroonhof
Jan Vroonhof
Andy Piper <andy(a)xemacs.org> writes:
> Maybe we need a new kind of weak hashtable - where the pair get removed
> only if both the key and the value are unmarked.
Ok.. I did the put "Fcons(instance,Qnil)" in the cache thing..
No crashes thus far
korteweg:/scratch/xemacs/xemacs-20/src> cvs diff glyphs.c window.c redisplay-output.c lisp.h alloc.c eval.c
Index: glyphs.c
===================================================================
RCS file: /usr/CVSroot/XEmacs/xemacs-20/src/glyphs.c,v
retrieving revision 1.23.2.72
diff -u -r1.23.2.72 glyphs.c
--- glyphs.c 2000/05/23 10:53:41 1.23.2.72
+++ glyphs.c 2000/05/26 20:57:49
＠＠ -73,6 +73,7 ＠＠
Lisp_Object Vimage_instance_type_list;
Lisp_Object Vglyph_type_list;
+
int disable_animated_pixmaps;
DEFINE_IMAGE_INSTANTIATOR_FORMAT (nothing);
＠＠ -562,7 +563,7 ＠＠
{
Lisp_Object window;
VOID_TO_LISP (window, flag_closure);
- assert (EQ (XIMAGE_INSTANCE_DOMAIN (value), window));
+ assert (EQ (XIMAGE_INSTANCE_DOMAIN (XCAR (value)), window));
}
return 0;
＠＠ -592,6 +593,71 ＠＠
check_window_subwindow_cache
(XWINDOW (XIMAGE_INSTANCE_DOMAIN (instance)));
}
+
+int inhibit_sledge_hammer_check = 0;
+
+static int found_in_cache = 0;
+
+static int
+find_instance_mapper (Lisp_Object key, Lisp_Object value,
+ void *flag_closure)
+{
+ /* This function can GC */
+ /* value can be nil; we cache failures as well as successes */
+ if (!NILP (value))
+ {
+ Lisp_Object instance;
+
+ VOID_TO_LISP (instance, flag_closure);
+ if (EQ (XCAR (value), instance))
+ {
+ found_in_cache = 1;
+ return 1;
+ }
+ }
+
+ return 0;
+}
+
+static void
+check_image_instance_in_window_cache (Lisp_Object instance)
+{
+ struct window *w;
+
+ if (WINDOWP (XIMAGE_INSTANCE_DOMAIN (instance)))
+ {
+ w = XWINDOW (XIMAGE_INSTANCE_DOMAIN (instance));
+
+ assert (!NILP (w->subwindow_instance_cache));
+
+ found_in_cache = 0;
+
+ elisp_maphash (find_instance_mapper,
+ w->subwindow_instance_cache,
+ LISP_TO_VOID (instance));
+
+ assert (found_in_cache);
+ }
+}
+
+void
+check_subwindow_instance_caches (void)
+{
+ Lisp_Object frmcons, devcons, concons;
+
+ if (inhibit_sledge_hammer_check)
+ return;
+
+ FRAME_LOOP_NO_BREAK (frmcons, devcons, concons)
+ {
+ Lisp_Object rest;
+
+ LIST_LOOP (rest, XWEAK_LIST_LIST
+ (FRAME_SUBWINDOW_CACHE (XFRAME (XCAR (frmcons)))))
+ check_image_instance_in_window_cache (XCAR (XCAR (rest)));
+ }
+}
+
#endif
/* Determine what kind of domain governs the image instance.
＠＠ -2953,7 +3019,7 ＠＠
static Lisp_Object
image_instantiate_cache_result (Lisp_Object locative)
{
- /* locative = (instance instantiator . subtable)
+ /* locative = ((instance . nil) instantiator . subtable)
So we are using the instantiator as the key and the instance as
the value. Since the hashtable is key-weak this means that the
＠＠ -2967,10 +3033,23 ＠＠
return Qnil;
}
+/* The hashvalue is one of
+ - Qnil
+ - (instance . Qnil) */
+static Lisp_Object
+gethashcar (Lisp_Object key, Lisp_Object table)
+{
+ Lisp_Object result = Fgethash (key, table, Qunbound);
+ if (CONSP (result))
+ return XCAR (result);
+ else
+ return result;
+}
+
+
/* Given a specification for an image, return an instance of
the image which matches the given instantiator and which can be
displayed in the given domain. */
-
static Lisp_Object
image_instantiate (Lisp_Object specifier, Lisp_Object matchspec,
Lisp_Object domain, Lisp_Object instantiator,
＠＠ -3038,10 +3117,9 ＠＠
/* First look in the device cache. */
if (DEVICEP (governing_domain))
{
- subtable = Fgethash (make_int (dest_mask),
+ subtable = gethashcar (make_int (dest_mask),
XDEVICE (governing_domain)->
- image_instance_cache,
- Qunbound);
+ image_instance_cache);
if (UNBOUNDP (subtable))
{
/* For the image instance cache, we do comparisons with
＠＠ -3066,14 +3144,14 ＠＠
: HASH_TABLE_KEY_WEAK,
pointerp ? HASH_TABLE_EQUAL
: HASH_TABLE_EQ);
- Fputhash (make_int (dest_mask), subtable,
+ Fputhash (make_int (dest_mask), Fcons (subtable, Qnil),
XDEVICE (governing_domain)->image_instance_cache);
instance = Qunbound;
}
else
{
- instance = Fgethash (pointerp ? ls3 : instantiator,
- subtable, Qunbound);
+ instance = gethashcar (pointerp ? ls3 : instantiator,
+ subtable);
}
}
else if (WINDOWP (governing_domain))
＠＠ -3081,9 +3159,8 ＠＠
/* Subwindows have a per-window cache and have to be treated
differently. */
instance =
- Fgethash (instantiator,
- XWINDOW (governing_domain)->subwindow_instance_cache,
- Qunbound);
+ gethashcar (instantiator,
+ XWINDOW (governing_domain)->subwindow_instance_cache);
}
else
abort (); /* We're not allowed anything else currently. */
＠＠ -3092,6 +3169,7 ＠＠
one. */
if (UNBOUNDP (instance))
{
+ Lisp_Object instance_cons;
Lisp_Object locative =
noseeum_cons (Qnil,
noseeum_cons (pointerp ? ls3 : instantiator,
＠＠ -3113,10 +3191,14 ＠＠
pointer_fg, pointer_bg,
dest_mask, glyph);
+ /* Create a private object to share between the window and
+ frame cache */
+ instance_cons = Fcons(instance, Qnil);
+
/* We need a per-frame cache for redisplay. */
- cache_subwindow_instance_in_frame_maybe (instance);
+ cache_subwindow_instance_in_frame_maybe (instance_cons);
- Fsetcar (locative, instance);
+ Fsetcar (locative, instance_cons);
#ifdef ERROR_CHECK_GLYPHS
if (image_instance_type_to_mask (XIMAGE_INSTANCE_TYPE (instance))
& (IMAGE_SUBWINDOW_MASK | IMAGE_WIDGET_MASK))
＠＠ -3127,10 +3209,10 ＠＠
#ifdef ERROR_CHECK_GLYPHS
if (image_instance_type_to_mask (XIMAGE_INSTANCE_TYPE (instance))
& (IMAGE_SUBWINDOW_MASK | IMAGE_WIDGET_MASK))
- assert (EQ (Fgethash ((pointerp ? ls3 : instantiator),
+ assert (EQ (gethashcar ((pointerp ? ls3 : instantiator),
XWINDOW (governing_domain)
- ->subwindow_instance_cache,
- Qunbound), instance));
+ ->subwindow_instance_cache),
+ instance));
#endif
}
else
＠＠ -3144,6 +3226,7 ＠＠
& (IMAGE_SUBWINDOW_MASK | IMAGE_WIDGET_MASK))
assert (EQ (XIMAGE_INSTANCE_FRAME (instance),
DOMAIN_FRAME (domain)));
+ check_subwindow_instance_caches();
#endif
ERROR_CHECK_IMAGE_INSTANCE (instance);
return instance;
＠＠ -4147,15 +4230,15 ＠＠
doing it every time something gets mapped, and deleted instances will be
removed automatically. */
static void
-cache_subwindow_instance_in_frame_maybe (Lisp_Object instance)
+cache_subwindow_instance_in_frame_maybe (Lisp_Object instance_cons)
{
- Lisp_Image_Instance* ii = XIMAGE_INSTANCE (instance);
+ Lisp_Image_Instance* ii = XIMAGE_INSTANCE (XCAR (instance_cons));
if (image_instance_type_to_mask (IMAGE_INSTANCE_TYPE (ii))
& (IMAGE_WIDGET_MASK | IMAGE_SUBWINDOW_MASK))
{
struct frame* f = DOMAIN_XFRAME (IMAGE_INSTANCE_DOMAIN (ii));
XWEAK_LIST_LIST (FRAME_SUBWINDOW_CACHE (f))
- = Fcons (instance, XWEAK_LIST_LIST (FRAME_SUBWINDOW_CACHE (f)));
+ = Fcons (instance_cons, XWEAK_LIST_LIST (FRAME_SUBWINDOW_CACHE (f)));
}
}
＠＠ -4171,10 +4254,11 ＠＠
LIST_LOOP (rest, XWEAK_LIST_LIST (FRAME_SUBWINDOW_CACHE (f)))
{
- Lisp_Image_Instance *ii = XIMAGE_INSTANCE (XCAR (rest));
+ Lisp_Object instance = XCAR (XCAR (rest));
+ Lisp_Image_Instance *ii = XIMAGE_INSTANCE (instance);
/* Make sure that the subwindow is unmapped so that window
deletion will not try and do it again. */
- unmap_subwindow (XCAR (rest));
+ unmap_subwindow (instance);
finalize_image_instance (ii, 0);
}
}
＠＠ -4187,12 +4271,13 ＠＠
LIST_LOOP (rest, XWEAK_LIST_LIST (FRAME_SUBWINDOW_CACHE (f)))
{
- Lisp_Object value = XCAR (rest);
+
+ Lisp_Object item = XCAR (rest);
/* Make sure that the subwindow is unmapped so that window
deletion will not try and do it again. */
- unmap_subwindow (value);
+ unmap_subwindow (XCAR (item));
XWEAK_LIST_LIST (FRAME_SUBWINDOW_CACHE (f))
- = delq_no_quit (value, XWEAK_LIST_LIST (FRAME_SUBWINDOW_CACHE (f)));
+ = delq_no_quit (item, XWEAK_LIST_LIST (FRAME_SUBWINDOW_CACHE (f)));
}
}
＠＠ -4290,7 +4375,7 ＠＠
LIST_LOOP (rest, XWEAK_LIST_LIST (FRAME_SUBWINDOW_CACHE (f)))
{
- Lisp_Image_Instance *ii = XIMAGE_INSTANCE (XCAR (rest));
+ Lisp_Image_Instance *ii = XIMAGE_INSTANCE (XCAR (XCAR (rest)));
if (IMAGE_INSTANCE_SUBWINDOW_DISPLAYEDP (ii)
&&
＠＠ -4404,7 +4489,7 ＠＠
/* If we get called we know something has changed. */
LIST_LOOP (rest, XWEAK_LIST_LIST (FRAME_SUBWINDOW_CACHE (f)))
{
- Lisp_Object widget = XCAR (rest);
+ Lisp_Object widget = XCAR (XCAR (rest));
if (XIMAGE_INSTANCE_SUBWINDOW_DISPLAYEDP (widget)
&&
Index: window.c
===================================================================
RCS file: /usr/CVSroot/XEmacs/xemacs-20/src/window.c,v
retrieving revision 1.41.2.52
diff -u -r1.41.2.52 window.c
--- window.c 2000/05/11 10:29:37 1.41.2.52
+++ window.c 2000/05/26 20:58:18
＠＠ -1603,9 +1603,10 ＠＠
(window))
{
struct window *w = decode_window (window);
+ struct frame *f = XFRAME (w->frame);
- int left = w->pixel_left;
- int top = w->pixel_top;
+ int left = w->pixel_left - FRAME_LEFT_BORDER_END (f) - FRAME_LEFT_GUTTER_BOUNDS(f);
+ int top = w->pixel_top - FRAME_TOP_BORDER_END (f) - FRAME_TOP_GUTTER_BOUNDS(f);;
return list4 (make_int (left),
make_int (top),
＠＠ -1878,8 +1879,8 ＠＠
/* value can be nil; we cache failures as well as successes */
if (!NILP (value))
{
- struct frame* f = XFRAME (XIMAGE_INSTANCE_FRAME (value));
- unmap_subwindow (value);
+ struct frame* f = XFRAME (XIMAGE_INSTANCE_FRAME (XCAR (value)));
+ unmap_subwindow (XCAR (value));
/* In case GC doesn't catch up fast enough, remove from the frame
cache also. Otherwise code that checks the sanity of the instance
will fail. */
＠＠ -1941,6 +1942,8 ＠＠
they don't sit around consuming excess space. They will be
reinitialized by the window-configuration code as necessary. */
finalize_window ((void *) w, 0);
+
+ check_subwindow_instance_caches();
}
DEFUN ("delete-window", Fdelete_window, 0, 2, "", /*
＠＠ -3539,6 +3542,8 ＠＠
p->pointm[CMOTION_DISP] = Qnil;
p->sb_point = Qnil;
p->buffer = Qnil;
+
+ check_subwindow_instance_caches();
}
DEFUN ("split-window", Fsplit_window, 0, 3, "", /*
＠＠ -5218,7 +5223,16 ＠＠
/* Force subwindows to be reinstantiated. They are all going
anyway and if we don't do this GC may not happen between now
- and the next time we check their integrity. */
+ and the next time we check their integrity.
+
+ #### JV: I don't understand this comment. Trying to be smart like
+ this and trying to do redisplay's work can cause problems
+ (See also comment in unmap_subwindow). In fact I don't follow
+ "all are going anyway" at all. Most calls of
+ Fset_windows_configuration
+ happen as part of save-window-excursion and have no redisplay
+ during the existance of the new state.
+ */
reset_frame_subwindow_instance_cache (f);
#if 0
＠＠ -5601,6 +5615,8 ＠＠
UNGCPRO;
+ check_subwindow_instance_caches();
+
return Qnil;
}
Index: redisplay-output.c
===================================================================
RCS file: /usr/CVSroot/XEmacs/xemacs-20/src/redisplay-output.c,v
retrieving revision 1.11.2.39
diff -u -r1.11.2.39 redisplay-output.c
--- redisplay-output.c 2000/05/22 09:52:57 1.11.2.39
+++ redisplay-output.c 2000/05/26 20:58:30
＠＠ -1168,7 +1168,7 ＠＠
LIST_LOOP (rest, XWEAK_LIST_LIST (FRAME_SUBWINDOW_CACHE (f)))
{
- Lisp_Image_Instance *ii = XIMAGE_INSTANCE (XCAR (rest));
+ Lisp_Image_Instance *ii = XIMAGE_INSTANCE (XCAR (XCAR (rest)));
if (IMAGE_INSTANCE_SUBWINDOW_DISPLAYEDP (ii)
&&
＠＠ -1184,7 +1184,7 ＠＠
&&
!EQ (XCAR (rest), ignored_window))
{
- unmap_subwindow (XCAR (rest));
+ unmap_subwindow (XCAR (XCAR (rest)));
}
}
}
Index: lisp.h
===================================================================
RCS file: /usr/CVSroot/XEmacs/xemacs-20/src/lisp.h,v
retrieving revision 1.38.2.64
diff -u -r1.38.2.64 lisp.h
--- lisp.h 2000/05/21 01:40:39 1.38.2.64
+++ lisp.h 2000/05/26 20:58:44
＠＠ -2351,6 +2351,9 ＠＠
/* Defined in glyphs.c */
Error_behavior decode_error_behavior_flag (Lisp_Object);
Lisp_Object encode_error_behavior_flag (Error_behavior);
+#ifdef ERROR_CHECK_GLYPHS
+void check_subwindow_instance_caches (void);
+#endif
/* Defined in indent.c */
int bi_spaces_at_point (struct buffer *, Bytind);
Index: alloc.c
===================================================================
RCS file: /usr/CVSroot/XEmacs/xemacs-20/src/alloc.c,v
retrieving revision 1.42.2.61
diff -u -r1.42.2.61 alloc.c
--- alloc.c 2000/05/01 11:00:02 1.42.2.61
+++ alloc.c 2000/05/26 20:59:04
＠＠ -3353,6 +3353,8 ＠＠
f = XFRAME (frame);
}
+ check_subwindow_instance_caches();
+
pre_gc_cursor = Qnil;
cursor_changed = 0;
＠＠ -3561,6 +3563,8 ＠＠
/* now stop inhibiting GC */
unbind_to (speccount, Qnil);
+
+ check_subwindow_instance_caches();
if (!breathing_space)
{
Index: eval.c
===================================================================
RCS file: /usr/CVSroot/XEmacs/xemacs-20/src/eval.c,v
retrieving revision 1.27.2.24
diff -u -r1.27.2.24 eval.c
--- eval.c 2000/05/17 07:35:45 1.27.2.24
+++ eval.c 2000/05/26 20:59:28
＠＠ -2939,6 +2939,10 ＠＠
UNGCPRO;
}
+#ifdef ERROR_CHECK_GLYPHS
+ check_subwindow_instance_caches ();
+#endif
+
if (++lisp_eval_depth > max_lisp_eval_depth)
{
if (max_lisp_eval_depth < 100)
＠＠ -3162,6 +3166,8 ＠＠
/* Callers should gcpro lexpr args */
garbage_collect_1 ();
+ check_subwindow_instance_caches();
+
if (++lisp_eval_depth > max_lisp_eval_depth)
{
if (max_lisp_eval_depth < 100)
- 2 participants
- 1 comments
bbdb and german/european phone numbers
25 years, 1 month
Nils Bokermann
Nils Bokermann
Hi!
Is there a way to get german phone numbers into the bbdb?
It reads:
Festnetz: (495) 412-0669 x875
should read:
Festnetz: (49) 541 20669875
or
Festnetz (49) 541 20 66 98 75
I've read the code, and there is `bbdb-north-american-phone-numbers-p'
But changing it to nil does not change anything (even not the input
section of bbdb)
Bye, Nils
--
Nils Bokermann
Phone: +49 521 8807498
- 1 participants
- 0 comments
Re: Package Status
25 years, 1 month
Karl M. Hegbloom
Karl M. Hegbloom
>>>>> "Valdis" == Valdis Kletnieks <Valdis.Kletnieks(a)vt.edu> writes:
Valdis> On Fri, 26 May 2000 06:31:47 PDT, Karl M. Hegbloom said:
>> I feel like I'm way behind.
Valdis> You're way ahead of me... I just use whatever the latest is and
Valdis> post when it won't build or crashes on my machine. ;)
Valdis> If I understood the innards at all, I'd have more of a fighting chance
Valdis> of understanding why 'gnuclient' blows things up... ;(
It's more a matter of spending the time to read the code now and less
a matter of just plain not being able to understand what it's doing
even if I try to read it. I've made progress.
I have still not finished reading the "Common Lisp HyperSpec", or
"Lisp in Small Peices"... There's so much to read!
- 1 participants
- 0 comments
Re: A load of X Error messages
25 years, 1 month
Jan Vroonhof
Jan Vroonhof
Norbert Koch <norbert(a)s.netic.de> writes:
> (56):scm$ Xlib: unexpected async reply (sequence 0xb852)!
> Xlib: unexpected async reply (sequence 0xbc58)!
> Xlib: unexpected async reply (sequence 0xbefa)!
> Xlib: unexpected async reply (sequence 0xc20f)!
> Xlib: unexpected async reply (sequence 0xc3d0)!
> Xlib: unexpected async reply (sequence 0xc716)!
> Xlib: unexpected async reply (sequence 0xc824)!
I have been seeing those for a while but have simply assumed that they
were the result of all the other problems we are working on now. After
the subwindow cache things gets fixed we can see whether that
assumption was true.
Jan
- 1 participants
- 0 comments
Re: set-window-configuration vs error-checking sub windows
25 years, 1 month
Jan Vroonhof
Jan Vroonhof
Jan Vroonhof <vroonhof(a)math.ethz.ch> writes:
> Before we do any fancy thing to keep the two caches consistent (such
> as creating a "cached_image_instance" object that proxys for
> image_instances, but has a finalizer that removes it from the frame
> cache). How about trying to get rid of the frame cache alltogether?
Note that that proxy can be simply storing Fcons(instance,Qnil)
instead of instance. This cons is then a private object shared between
the two caches so no other objects can hold references to it.
Jan
- 1 participants
- 0 comments
A load of X Error messages
25 years, 1 month
Norbert Koch
Norbert Koch
Hi!
After updating and building,
XEmacs 21.2 (beta33) "Melpomene" [Lucid] (i386-unknown-freebsdelf3.2)
of Fri May 26 2000 on sokrates,
I get a myriad of messages:
(56):scm$ Xlib: unexpected async reply (sequence 0xb852)!
Xlib: unexpected async reply (sequence 0xbc58)!
Xlib: unexpected async reply (sequence 0xbefa)!
Xlib: unexpected async reply (sequence 0xc20f)!
Xlib: unexpected async reply (sequence 0xc3d0)!
Xlib: unexpected async reply (sequence 0xc716)!
Xlib: unexpected async reply (sequence 0xc824)!
xemacs: X Error of failed request: BadFont (invalid Font parameter)
Major opcode of failed request: 47 (X_QueryFont)
Resource id in failed request: 0x1c00be8
Serial number of failed request: 52095
Current serial number in output stream: 52094
xemacs: X Error of failed request: BadName (named color or font does not exist)
Major opcode of failed request: 45 (X_OpenFont)
Serial number of failed request: 52094
Current serial number in output stream: 52094
The former occurred while deleting a couple of buffers, the latter
during gnus and message startup.
Any hints? Thanks,
norbert.
--
Th' MIND is the Pizza Palace of th' SOUL
- 1 participants
- 0 comments
crtX.o location on Linux
25 years, 1 month
Gunnar Evermann
Gunnar Evermann
I have got a bug report from a user who can't build on Linux because
crtn.o is not in the default place (/usr/lib/).
The paths are hard-coded into s/linux.h. Shouldn't we try to auto-detect
them, like we do for libgcc.a?
Gunnar
- 1 participants
- 0 comments