Mercurial > hg > xemacs-beta

comparison src/data.c @ 108:360340f9fd5f r20-1b6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b6
author cvs
date Mon, 13 Aug 2007 09:18:39 +0200
parents cf808b4c4290
children fe104dbd9147
comparison
equal deleted inserted replaced
107:523141596bda 108:360340f9fd5f
82 { 82 {
83 if (((CHARP (obj1) && INTP (obj2)) || (CHARP (obj2) && INTP (obj1))) 83 if (((CHARP (obj1) && INTP (obj2)) || (CHARP (obj2) && INTP (obj1)))
84 && (debug_issue_ebola_notices >= 2 84 && (debug_issue_ebola_notices >= 2
85 || XREALINT (obj1) == XREALINT (obj2))) 85 || XREALINT (obj1) == XREALINT (obj2)))
86 { 86 {
87 stderr_out ("Ebola warning!! ("); 87 /* Continuing the joke by printing `Ebola warning!!!' confuses */
88 /* too many people. The message must be printed because Emacs used */
89 /* to work differently for two decades. */
90 stderr_out("Comparison between integer and character is constant nil (");
88 Fprinc (obj1, Qexternal_debugging_output); 91 Fprinc (obj1, Qexternal_debugging_output);
89 stderr_out (" and "); 92 stderr_out (" and ");
90 Fprinc (obj2, Qexternal_debugging_output); 93 Fprinc (obj2, Qexternal_debugging_output);
91 stderr_out (")\n"); 94 stderr_out (")\n");
92 debug_short_backtrace (debug_ebola_backtrace_length); 95 debug_short_backtrace (debug_ebola_backtrace_length);