February 2005 - xemacs-cvs＠xemacs.org - XEmacs Mailing List Archives

CVS update by stephent MODIFIED: xemacs/lib-src ... 19 years, 10 months

CVS Monitor

User: stephent Date: 05/02/22 09:05:59 Modified: xemacs/lib-src ChangeLog make-docfile.c Log: handle UNUSED in DEFUN <87vf8l58aq.fsf(a)tleepslib.sk.tsukuba.ac.jp> Revision Changes Path 1.187 +5 -0 XEmacs/xemacs/lib-src/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lib-src/ChangeLog,v retrieving revision 1.186 retrieving revision 1.187 diff -u -r1.186 -r1.187 --- ChangeLog 2005/02/18 06:28:31 1.186 +++ ChangeLog 2005/02/22 08:05:58 1.187 ＠＠ -1,3 +1,8 ＠＠ +2004-12-19 Stephen J. Turnbull <stephen(a)xemacs.org> + + * make-docfile.c (write_c_args): Handle UNUSED, USED_IF macros. + (scan_c_file): Handle nested parens in DEFUN argument lists. + 2005-02-18 Stephen J. Turnbull <stephen(a)xemacs.org> * XEmacs 21.5.19 "chives" is released. 1.17 +55 -3 XEmacs/xemacs/lib-src/make-docfile.c Index: make-docfile.c =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lib-src/make-docfile.c,v retrieving revision 1.16 retrieving revision 1.17 diff -u -r1.16 -r1.17 --- make-docfile.c 2004/12/06 03:50:53 1.16 +++ make-docfile.c 2005/02/22 08:05:58 1.17 ＠＠ -525,9 +525,16 ＠＠ char c = *p; int ident_start = 0; - /* XEmacs addition: add support for ANSI prototypes. Hop over - "Lisp_Object" string (the only C type allowed in DEFUNs) */ + /* XEmacs addition: add support for ANSI prototypes and the UNUSED + macros. Hop over them. "Lisp_Object" is the only C type allowed + in DEFUNs. For the UNUSED macros we need to eat parens, too. */ + static char uu [] = "UNUSED"; + static char ui [] = "USED_IF_"; static char lo[] = "Lisp_Object"; + + /* aren't these all vulnerable to buffer overrun? I guess that + means that the .c is busted, so we may as well just die ... */ + /* skip over "Lisp_Object" */ if ((C_IDENTIFIER_CHAR_P (c) != in_ident) && !in_ident && (strncmp (p, lo, sizeof (lo) - 1) == 0) && isspace ((unsigned char) p[sizeof (lo) - 1])) ＠＠ -538,6 +545,45 ＠＠ c = *p; } + /* skip over "UNUSED" invocation */ + if ((C_IDENTIFIER_CHAR_P (c) != in_ident) && !in_ident && + (strncmp (p, uu, sizeof (uu) - 1) == 0)) + { + char *here = p; + p += (sizeof (uu) - 1); + while (isspace ((unsigned char) (*p))) + p++; + if (*p == '(') + { + while (isspace ((unsigned char) (*++p))) + ; + c = *p; + } + else + p = here; + } + + /* skip over "USED_IF_*" invocation (only if USED failed) */ + else if ((C_IDENTIFIER_CHAR_P (c) != in_ident) && !in_ident && + (strncmp (p, ui, sizeof (ui) - 1) == 0)) + { + char *here = p; + p += (sizeof (ui) - 1); + /* There should be a law against parsing in C: + this allows a broken USED_IF call, skipping to next macro's + parens. *You* can fix that, I don't see how offhand. ;-) */ + while (*p && *p++ != '(') + ; + if (*p) + { + while (isspace ((unsigned char) (*p))) + p++; + c = *p; + } + else + p = here; + } + /* Notice when we start printing a new identifier. */ if (C_IDENTIFIER_CHAR_P (c) != in_ident) { ＠＠ -836,6 +882,7 ＠＠ if (defunflag && maxargs != -1) { char argbuf[1024], *p = argbuf; + int paren_level = 1; #if 0 /* For old DEFUN's only */ while (c != ')') { ＠＠ -858,8 +905,13 ＠＠ *p++ = c = getc (infile); if (c < 0) goto eof; + /* XEmacs change: handle macros with args (eg, UNUSED) */ + if (c == ')') + paren_level--; + if (c == '(') + paren_level++; } - while (c != ')'); + while (paren_level > 0); *p = '\0'; /* Output them. */ if (ellcc)

1 participants
0 comments

CVS update by stephent MODIFIED: xemacs/src ... 19 years, 10 months

CVS Monitor

User: stephent Date: 05/02/22 08:16:22 Modified: xemacs/src ChangeLog emacs.c config.h.in Log: xemacs-release-date <874qg56pbc.fsf(a)tleepslib.sk.tsukuba.ac.jp> Revision Changes Path 1.437 +6 -0 XEmacs/xemacs/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/ChangeLog,v retrieving revision 1.436 retrieving revision 1.437 diff -u -r1.436 -r1.437 --- ChangeLog 2005/02/18 06:27:59 1.436 +++ ChangeLog 2005/02/22 07:15:59 1.437 ＠＠ -1,3 +1,9 ＠＠ +2005-02-21 Stephen J. Turnbull <stephen(a)xemacs.org> + + * version.sh (XEMACS_RELEASE_DATE): New version info variable. + + * configure.in (XEMACS_RELEASE_DATE): Use it. + 2005-02-18 Stephen J. Turnbull <stephen(a)xemacs.org> * XEmacs 21.5.19 "chives" is released. 1.239 +3 -0 XEmacs/xemacs/configure.in Index: configure.in =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/configure.in,v retrieving revision 1.238 retrieving revision 1.239 diff -u -r1.238 -r1.239 --- configure.in 2005/02/03 17:33:53 1.238 +++ configure.in 2005/02/22 07:15:59 1.239 ＠＠ -1006,6 +1006,9 ＠＠ if test "$xemacs_extra_name" != ""; then AC_DEFINE_UNQUOTED(XEMACS_EXTRA_NAME, "$xemacs_extra_name") fi +if test "$xemacs_release_date" != ""; then + AC_DEFINE_UNQUOTED(XEMACS_RELEASE_DATE, "$xemacs_release_date") +fi AC_DEFINE_UNQUOTED(EMACS_VERSION, "$version") if test "$with_infodock" = "yes"; then 1.1075 +1 -0 XEmacs/xemacs/version.sh Index: version.sh =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/version.sh,v retrieving revision 1.1074 retrieving revision 1.1075 diff -u -r1.1074 -r1.1075 --- version.sh 2005/02/21 22:51:17 1.1074 +++ version.sh 2005/02/22 07:16:01 1.1075 ＠＠ -9,3 +9,4 ＠＠ infodock_minor_version=0 infodock_build_version=8 xemacs_extra_name="(+CVS-20050221)" +xemacs_release_date="2005-02-18" 1.643 +5 -0 XEmacs/xemacs/lisp/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/ChangeLog,v retrieving revision 1.642 retrieving revision 1.643 diff -u -r1.642 -r1.643 --- ChangeLog 2005/02/19 22:25:12 1.642 +++ ChangeLog 2005/02/22 07:16:06 1.643 ＠＠ -1,3 +1,8 ＠＠ +2005-02-21 Stephen J. Turnbull <stephen(a)xemacs.org> + + * about.el (about-xemacs): + Compute release date from xemacs-release-date. + 2005-02-19 Norbert Koch <viteno(a)xemacs.org> * package-ui.el (pui-list-packages): The longest package name now 1.65 +22 -2 XEmacs/xemacs/lisp/about.el Index: about.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/about.el,v retrieving revision 1.64 retrieving revision 1.65 diff -u -r1.64 -r1.65 --- about.el 2005/02/04 02:56:43 1.64 +++ about.el 2005/02/22 07:16:07 1.65 ＠＠ -378,8 +378,28 ＠＠ (t (format "%d.%d" emacs-major-version emacs-minor-version)))) - (emacs-about-version (format "version %s of September 2004" - emacs-short-version))) + (emacs-release-date + (if (and (boundp 'xemacs-release-date) + (stringp xemacs-release-date) + (string-match "^\$[0-9]\\{4\\}\$-\$[0-9][0-9]\$-" + xemacs-release-date)) + (format "%s %s" + (aref [ "January" "February" "March" "April" + "May" "June" "July" "August" + "September" "October" "November" "December" ] + (1- (string-to-number + (match-string 2 xemacs-release-date)))) + (match-string 1 xemacs-release-date)) + "February 2005 (defaulted in about.el)")) + (emacs-variant-info (if (and xemacs-extra-name + (stringp xemacs-extra-name) + (< 0 (length xemacs-extra-name))) + (format " %s" xemacs-extra-name) + "")) + (emacs-about-version (format "version %s of %s%s" + emacs-short-version + emacs-release-date + emacs-variant-info))) (widget-insert (about-center emacs-about-version)) (widget-create 'link :help-echo "What's new in XEmacs" :action 'about-news 1.289 +12 -0 XEmacs/xemacs/man/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/man/ChangeLog,v retrieving revision 1.288 retrieving revision 1.289 diff -u -r1.288 -r1.289 --- ChangeLog 2005/02/19 16:18:52 1.288 +++ ChangeLog 2005/02/22 07:16:11 1.289 ＠＠ -1,3 +1,15 ＠＠ +2005-02-22 Stephen J. Turnbull <stephen(a)xemacs.org> + + * internals/internals.texi (The version.sh Script): New node. + (XEmacs from the Perspective of Building): + (Low-Level Modules): + (The Build Configuration System): + (Adding Configurable Features): + Add or update references to the version.sh node and/or file. + + (XEmacs from the Perspective of Building): Improve text. + + 2005-02-19 Stephen J. Turnbull <stephen(a)xemacs.org> * internals/internals.texi (Introduction to Writing C Code): 1.793 +9 -0 XEmacs/xemacs/src/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/ChangeLog,v retrieving revision 1.792 retrieving revision 1.793 diff -u -r1.792 -r1.793 --- ChangeLog 2005/02/18 21:56:10 1.792 +++ ChangeLog 2005/02/22 07:16:14 1.793 ＠＠ -1,3 +1,12 ＠＠ +2005-02-21 Stephen J. Turnbull <stephen(a)xemacs.org> + + * emacs.c (xemacs-release-date): New version info variable. + * config.h.in (XEMACS_RELEASE_DATE): New config.h macro. + + * emacs.c (inhibit-early-packages): + (inhibit-all-packages): + (xemacs-extra-name): Improve docstrings. + 2005-02-18 Jerry James <james(a)xemacs.org> * number.c: Define USED_IF_BIGFLOAT. 1.155 +25 -6 XEmacs/xemacs/src/emacs.c Index: emacs.c =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/emacs.c,v retrieving revision 1.154 retrieving revision 1.155 diff -u -r1.154 -r1.155 --- emacs.c 2005/01/31 19:29:48 1.154 +++ emacs.c 2005/02/22 07:16:16 1.155 ＠＠ -509,6 +509,7 ＠＠ Lisp_Object Vemacs_beta_version; Lisp_Object Vxemacs_codename; Lisp_Object Vxemacs_extra_name; +Lisp_Object Vxemacs_release_date; #ifdef INFODOCK Lisp_Object Vinfodock_major_version; Lisp_Object Vinfodock_minor_version; ＠＠ -4146,15 +4147,31 ＠＠ Vxemacs_codename = build_string (XEMACS_CODENAME); DEFVAR_LISP ("xemacs-extra-name", &Vxemacs_extra_name /* -Extra string to maybe put into the version string. +Arbitrary string to place in the version string after the codename. -Usually used to denote an XEmacs built from a CVS checkout between -releases. In that case its value would be \"(+CVS)\". +Appropriate surrounding whitespace will be added, but typically looks best +if enclosed in parentheses. + +A standard use is to indicate the date version.sh was last updated from +the CVS mainline, where it is automatically given a value similar to +\"(+CVS-20050221)\". Developers may also use it to indicate particular +branches, etc. */ ); #ifdef XEMACS_EXTRA_NAME Vxemacs_extra_name = build_string (XEMACS_EXTRA_NAME); #endif + DEFVAR_LISP ("xemacs-release-date", &Vxemacs_release_date /* +ISO 8601 format date string giving the date of latest release in series. + +The time may optionally be given. The time zone may not be given, and +is (implicitly) UTC. Currently not included in the version string. +*/ ); +#ifndef XEMACS_RELEASE_DATE +#define XEMACS_RELEASE_DATE "2005-02-18 (defaulted in emacs.c)" +#endif + Vxemacs_release_date = build_string (XEMACS_RELEASE_DATE); + /* Lisp variables which contain command line flags. The portable dumper stomps on these; they must be saved and restored ＠＠ -4169,12 +4186,14 ＠＠ */ ); DEFVAR_BOOL ("inhibit-early-packages", &inhibit_early_packages /* -Set to non-nil when the early packages should not be respected at startup. +Set to non-nil when the early packages should be ignored at startup. +Early package directories will not be added to `load-path', nor set up as +autoloads, nothing. */ ); DEFVAR_BOOL ("inhibit-all-packages", &inhibit_all_packages /* -Set to non-nil when the no packages should not be respected at startup. -XEmacs will utterly ignore the packages -- not in load-path, not set up as +Set to non-nil when all packages should be ignored at startup. +Package directories will not be added to `load-path', nor set up as autoloads, nothing. */ ); 1.97 +1 -0 XEmacs/xemacs/src/config.h.in Index: config.h.in =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/config.h.in,v retrieving revision 1.96 retrieving revision 1.97 diff -u -r1.96 -r1.97 --- config.h.in 2005/02/03 16:30:35 1.96 +++ config.h.in 2005/02/22 07:16:16 1.97 ＠＠ -110,6 +110,7 ＠＠ #undef EMACS_VERSION #undef XEMACS_CODENAME #undef XEMACS_EXTRA_NAME +#undef XEMACS_RELEASE_DATE /* InfoDock versions, not used with XEmacs */ #undef INFODOCK_MAJOR_VERSION #undef INFODOCK_MINOR_VERSION

1 participants
0 comments

CVS update by viteno MODIFIED: xemacs ... 19 years, 10 months

CVS Monitor

User: viteno Date: 05/02/21 23:51:17 Modified: xemacs version.sh Log: Update xemacs_extra_name. Revision Changes Path 1.1074 +1 -1 XEmacs/xemacs/version.sh Index: version.sh =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/version.sh,v retrieving revision 1.1073 retrieving revision 1.1074 diff -u -r1.1073 -r1.1074 --- version.sh 2005/02/20 22:51:12 1.1073 +++ version.sh 2005/02/21 22:51:17 1.1074 ＠＠ -8,4 +8,4 ＠＠ infodock_major_version=4 infodock_minor_version=0 infodock_build_version=8 -xemacs_extra_name="(+CVS-20050220)" +xemacs_extra_name="(+CVS-20050221)"

1 participants
0 comments

CVS update by adrian MODIFIED: xemacsweb/Download ... 19 years, 10 months

CVS Monitor

User: adrian Date: 05/02/21 23:12:17 Modified: xemacsweb/Download ChangeLog index.content Log: xemacsweb: Update of links to au.xemacs.org on maintainer's request -------------------- ChangeLog entries follow: -------------------- Download/ChangeLog addition: 2005-02-21 Adrian Aichner <adrian(a)xemacs.org> * index.content: Update of links to au.xemacs.org on maintainer's request. Install/ChangeLog addition: 2005-02-21 Adrian Aichner <adrian(a)xemacs.org> * index.content: Update of links to au.xemacs.org on maintainer's request. Releases/ChangeLog addition: 2005-02-21 Adrian Aichner <adrian(a)xemacs.org> * index.content: Update of links to au.xemacs.org on maintainer's request. Revision Changes Path 1.109 +5 -0 XEmacs/xemacsweb/Releases/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Releases/ChangeLog,v retrieving revision 1.108 retrieving revision 1.109 diff -u -r1.108 -r1.109 --- ChangeLog 2005/02/18 09:52:28 1.108 +++ ChangeLog 2005/02/21 22:11:51 1.109 ＠＠ -1,3 +1,8 ＠＠ +2005-02-21 Adrian Aichner <adrian(a)xemacs.org> + + * index.content: Update of links to au.xemacs.org on maintainer's + request. + 2005-02-18 Stephen J. Turnbull <stephen(a)xemacs.org> * index.content: 1.98 +3 -3 XEmacs/xemacsweb/Releases/index.content Index: index.content =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Releases/index.content,v retrieving revision 1.97 retrieving revision 1.98 diff -u -r1.97 -r1.98 --- index.content 2005/02/18 09:52:28 1.97 +++ index.content 2005/02/21 22:11:51 1.98 ＠＠ -29,7 +29,7 ＠＠ or a mirror in your country: <a href="ftp://xemacs.xmundo.net/pub/mirrors/xemacs/stable/">ar</a> <a href="http://ftp.at.xemacs.org/editors/xemacs/stable/">at</a> - <a href="http://ftp.au.xemacs.org/pub/xemacs/stable/">au</a> + <a href="http://www.au.xemacs.org/pub/xemacs/stable/">au</a> <a href="http://ftp.be.xemacs.org/ftp/xemacs/stable/">be</a> <a href="http://ftp.br.xemacs.org/pub/xemacs/stable/">br</a> <a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/stable/">ca</a> ＠＠ -183,7 +183,7 ＠＠ or a mirror in your country: <a href="ftp://xemacs.xmundo.net/pub/mirrors/xemacs/beta/">ar</a> <a href="http://ftp.at.xemacs.org/editors/xemacs/beta/">at</a> - <a href="http://ftp.au.xemacs.org/pub/xemacs/beta/">au</a> + <a href="http://www.au.xemacs.org/pub/xemacs/beta/">au</a> <a href="http://ftp.be.xemacs.org/ftp/xemacs/beta/">be</a> <a href="http://ftp.br.xemacs.org/pub/xemacs/xemacs-21.5/">br</a> <a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/beta/">ca</a> ＠＠ -337,7 +337,7 ＠＠ or from a mirror in your country: <a href="ftp://xemacs.xmundo.net/pub/mirrors/xemacs/packages/">ar</a> <a href="http://ftp.at.xemacs.org/editors/xemacs/packages/">at</a> - <a href="http://ftp.au.xemacs.org/pub/xemacs/packages/">au</a> + <a href="http://www.au.xemacs.org/pub/xemacs/packages/">au</a> <a href="http://ftp.be.xemacs.org/ftp/xemacs/packages/">be</a> <a href="http://ftp.br.xemacs.org/pub/xemacs/packages/">br</a> <a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/packages/">ca</a> 1.34 +5 -0 XEmacs/xemacsweb/Install/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Install/ChangeLog,v retrieving revision 1.33 retrieving revision 1.34 diff -u -r1.33 -r1.34 --- ChangeLog 2005/02/17 21:40:59 1.33 +++ ChangeLog 2005/02/21 22:12:04 1.34 ＠＠ -1,3 +1,8 ＠＠ +2005-02-21 Adrian Aichner <adrian(a)xemacs.org> + + * index.content: Update of links to au.xemacs.org on maintainer's + request. + 2005-02-06 Joachim Schrod <jschrod(a)acm.org> * index.content: Refer to packageGuide in case of EFS or GPG 1.34 +1 -1 XEmacs/xemacsweb/Install/index.content Index: index.content =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Install/index.content,v retrieving revision 1.33 retrieving revision 1.34 diff -u -r1.33 -r1.34 --- index.content 2005/02/17 21:40:59 1.33 +++ index.content 2005/02/21 22:12:05 1.34 ＠＠ -167,7 +167,7 ＠＠ or a mirror in your country: <a href="ftp://xemacs.xmundo.net/pub/mirrors/xemacs/packages/">ar</a> <a href="http://ftp.at.xemacs.org/editors/xemacs/packages/">at</a> - <a href="http://ftp.au.xemacs.org/pub/xemacs/packages/">au</a> + <a href="http://www.au.xemacs.org/pub/xemacs/packages/">au</a> <a href="http://ftp.be.xemacs.org/ftp/xemacs/packages/">be</a> <a href="http://ftp.br.xemacs.org/pub/xemacs/packages/">br</a> <a href="http://ftp.ca.xemacs.org/pub/Mirror/xemacs/packages/">ca</a> 1.157 +5 -0 XEmacs/xemacsweb/Download/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Download/ChangeLog,v retrieving revision 1.156 retrieving revision 1.157 diff -u -r1.156 -r1.157 --- ChangeLog 2005/01/31 20:52:55 1.156 +++ ChangeLog 2005/02/21 22:12:16 1.157 ＠＠ -1,3 +1,8 ＠＠ +2005-02-21 Adrian Aichner <adrian(a)xemacs.org> + + * index.content: Update of links to au.xemacs.org on maintainer's + request. + 2005-01-31 Ben Wing <ben(a)xemacs.org> * optLibs.content: Point to win32/ directory rather than FTP site. 1.64 +2 -2 XEmacs/xemacsweb/Download/index.content Index: index.content =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacsweb/Download/index.content,v retrieving revision 1.63 retrieving revision 1.64 diff -u -r1.63 -r1.64 --- index.content 2004/12/10 00:25:30 1.63 +++ index.content 2005/02/21 22:12:16 1.64 ＠＠ -285,8 +285,8 ＠＠ <ul> <li><a href="ftp://ftp.au.xemacs.org/pub/xemacs/" ><b>ftp.au.xemacs.org (FTP)</b></a></li> - <li><a href="http://ftp.au.xemacs.org/pub/xemacs/" - ><b>ftp.au.xemacs.org (HTTP)</b></a></li> + <li><a href="http://www.au.xemacs.org/pub/xemacs/" + ><b>www.au.xemacs.org (HTTP)</b></a></li> <li> <p></p> <h5>Secondary Mirrors</h5>

1 participants
0 comments

CVS update by stephent MODIFIED: xemacs/src ... 19 years, 10 months

CVS Monitor

User: stephent Date: 05/02/21 09:43:36 Modified: xemacs/src Tag: sjt-xft ChangeLog objects-x.c Log: tweak debug message <87psyu8fu3.fsf(a)tleepslib.sk.tsukuba.ac.jp> Revision Changes Path No revision No revision 1.758.2.10 +4 -0 XEmacs/xemacs/src/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/ChangeLog,v retrieving revision 1.758.2.9 retrieving revision 1.758.2.10 diff -u -r1.758.2.9 -r1.758.2.10 --- ChangeLog 2005/02/20 14:46:46 1.758.2.9 +++ ChangeLog 2005/02/21 08:43:29 1.758.2.10 ＠＠ -1,3 +1,7 ＠＠ +2005-02-21 Stephen J. Turnbull <stephen(a)xemacs.org> + + * objects-x.c (x_finalize_font_instance): Improve debug message. + 2005-02-20 Stephen J. Turnbull <stephen(a)xemacs.org> * objects-x.c (x_initialize_font_instance): Estimate average cell 1.26.2.8 +1 -1 XEmacs/xemacs/src/objects-x.c Index: objects-x.c =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/objects-x.c,v retrieving revision 1.26.2.7 retrieving revision 1.26.2.8 diff -u -r1.26.2.7 -r1.26.2.8 --- objects-x.c 2005/02/20 14:46:49 1.26.2.7 +++ objects-x.c 2005/02/21 08:43:33 1.26.2.8 ＠＠ -401,7 +401,7 ＠＠ if (debug_xft > 0) stderr_out ("finalizing %s", (STRINGP (f->name) ? (char *) XSTRING_DATA (f->name) - : "no font name")); + : "(unnamed font)")); #endif if (f->data)

1 participants
0 comments

CVS update by viteno MODIFIED: xemacs ... 19 years, 10 months

CVS Monitor

User: viteno Date: 05/02/20 23:51:13 Modified: xemacs version.sh Log: Update xemacs_extra_name. Revision Changes Path 1.1073 +1 -1 XEmacs/xemacs/version.sh Index: version.sh =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/version.sh,v retrieving revision 1.1072 retrieving revision 1.1073 diff -u -r1.1072 -r1.1073 --- version.sh 2005/02/19 22:50:54 1.1072 +++ version.sh 2005/02/20 22:51:12 1.1073 ＠＠ -8,4 +8,4 ＠＠ infodock_major_version=4 infodock_minor_version=0 infodock_build_version=8 -xemacs_extra_name="(+CVS-20050219)" +xemacs_extra_name="(+CVS-20050220)"

1 participants
0 comments

CVS update by stephent MODIFIED: xemacs/src ... 19 years, 10 months

CVS Monitor

User: stephent Date: 05/02/20 15:46:52 Modified: xemacs/src Tag: sjt-xft ChangeLog objects-x.c Log: sane character width estimate <87is4n8f4q.fsf(a)tleepslib.sk.tsukuba.ac.jp> Revision Changes Path No revision No revision 1.758.2.9 +6 -0 XEmacs/xemacs/src/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/ChangeLog,v retrieving revision 1.758.2.8 retrieving revision 1.758.2.9 diff -u -r1.758.2.8 -r1.758.2.9 --- ChangeLog 2005/02/11 15:50:40 1.758.2.8 +++ ChangeLog 2005/02/20 14:46:46 1.758.2.9 ＠＠ -1,3 +1,9 ＠＠ +2005-02-20 Stephen J. Turnbull <stephen(a)xemacs.org> + + * objects-x.c (x_initialize_font_instance): Estimate average cell + width based on dimensions of "representative" string. Suppress + some excessive debug output. Get rid of spurious tests. + 2005-02-11 Eric Knauel <eric(a)xemacs.org> * xft-fonts.c: throw away old code that was wrapped inside 1.26.2.7 +26 -16 XEmacs/xemacs/src/objects-x.c Index: objects-x.c =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/src/objects-x.c,v retrieving revision 1.26.2.6 retrieving revision 1.26.2.7 diff -u -r1.26.2.6 -r1.26.2.7 --- objects-x.c 2005/02/01 15:46:56 1.26.2.6 +++ objects-x.c 2005/02/20 14:46:49 1.26.2.7 ＠＠ -261,22 +261,29 ＠＠ /* #### This shit is just plain wrong unless we have a character cell font. It really hoses us on large repertoire Unicode fonts with "double-width" characters. */ - /* #### We just init'ed the memory; these are all zero to start. */ - if (f->ascent < rf->ascent) - f->ascent = rf->ascent; - if (f->descent < rf->descent) - f->descent = rf->descent; - if (f->width < rf->max_advance_width) - f->width = rf->max_advance_width; - if (f->height < rf->height) - f->height = rf->height; + f->ascent = rf->ascent; + f->descent = rf->descent; + { + /* This is an approximation that AFAIK only gets used to compute + cell size for estimating window dimensions. The test_string8 + is an ASCII string whose characters should approximate the + distribution of widths expected in real text. */ + static const char test_string8[] = "Mmneei"; + static const int len = sizeof (test_string8) - 1; + XGlyphInfo glyphinfo; + + XftTextExtents8 (dpy, rf, test_string8, len, &glyphinfo); + /* #### maybe should be glyphinfo.xOff - glyphinfo.x? */ + f->width = glyphinfo.width/len + 1; + } + f->height = rf->height; /* #### Is this right? See comment on proportional_p below. */ f->proportional_p = 1; /* we can't recognize monospaced fonts! */ - if (debug_xft > 1) - stderr_out ("initialized ascent %d descent %d width %d height %d\n", - f->ascent, f->descent, f->width, f->height); if (debug_xft > 0) + stderr_out ("initialized metrics ascent %d descent %d width %d height %d\n", + f->ascent, f->descent, f->width, f->height); + if (debug_xft > 2) /* we also output on initialization of any font below */ stderr_out ("initialized Xft font %s\n", extname); } else ＠＠ -355,10 +362,13 ＠＠ { int n = 3, d = 5; /* #### check for weirdness */ - if (n*f->height < d*f->width) - stderr_out ("width of %s is %d, larger than %d/%d its height %d\n", - extname, f->width, n, d, f->height); - stderr_out ("initialized Xft font %s\n", extname); + if (n * f->height < d * f->width) + stderr_out ("font %s: width:height is %d:%d, larger than %d:%d\n", + extname, f->width, f->height, n, d); + if (f->height <= 0 || f->width <= 0) + stderr_out ("bogus dimensions of font %s: width = %d, height = %d\n", + extname, f->width, f->height); + stderr_out ("initialized font %s\n", extname); } #else #undef rf

1 participants
0 comments

CVS update by stephent MODIFIED: xemacs ... 19 years, 10 months

CVS Monitor

User: stephent Date: 05/02/20 15:00:46 Modified: xemacs Tag: sjt-xft ChangeLog configure.ac Log: declare xaw3d option correctly; workaround autoconf bug <87mztz8hc6.fsf(a)tleepslib.sk.tsukuba.ac.jp> Revision Changes Path No revision No revision 1.418.2.8 +5 -0 XEmacs/xemacs/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/ChangeLog,v retrieving revision 1.418.2.7 retrieving revision 1.418.2.8 diff -u -r1.418.2.7 -r1.418.2.8 --- ChangeLog 2005/02/19 14:43:30 1.418.2.7 +++ ChangeLog 2005/02/20 14:00:45 1.418.2.8 ＠＠ -1,3 +1,8 ＠＠ +2005-02-20 Stephen J. Turnbull <stephen(a)xemacs.org> + + * configure.ac (athena): Spells as 3d, not xaw3d, in declaration. + (sound): quickfix: AC_DEFINE, not AC_DEFINE_UNQUOTED, at top level. + 2005-02-19 Stephen J. Turnbull <stephen(a)xemacs.org> * configure.ac (XE_EXPAND_COMPLEX_OPTION): Use same name in comment. 1.1.14.6 +3 -2 XEmacs/xemacs/configure.ac Index: configure.ac =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/configure.ac,v retrieving revision 1.1.14.5 retrieving revision 1.1.14.6 diff -u -r1.1.14.5 -r1.1.14.6 --- configure.ac 2005/02/19 14:43:30 1.1.14.5 +++ configure.ac 2005/02/20 14:00:45 1.1.14.6 ＠＠ -868,7 +868,7 ＠＠ XE_KEYWORD_ARG_WITH([athena], AC_HELP_STRING([--with-athena],[Use TYPE Athena widgets (xaw, 3d, next, 95, or xpm).]), -[],[],[xaw,xaw3d,next,95,xpm])dnl +[],[],[xaw,3d,next,95,xpm])dnl XE_KEYWORD_ARG_WITH([xim],[],[],[],[yes,no,xlib,motif])dnl ＠＠ -4827,7 +4827,8 ＠＠ if test "$sound_found" = "yes"; then need_miscplay=yes XE_ADD_OBJS(linuxplay.o) - [AC_DEFINE_UNQUOTED(SOUNDCARD_H_FILE, "${dir}/soundcard.h")] + dnl I don't understand, but autoconf chokes on AC_DEFINE_UNQUOTED here + AC_DEFINE(SOUNDCARD_H_FILE, "${dir}/soundcard.h") fi fi

1 participants
0 comments

CVS update by viteno MODIFIED: xemacs ... 19 years, 10 months

CVS Monitor

User: viteno Date: 05/02/19 23:50:55 Modified: xemacs version.sh Log: Update xemacs_extra_name. Revision Changes Path 1.1072 +1 -1 XEmacs/xemacs/version.sh Index: version.sh =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/version.sh,v retrieving revision 1.1071 retrieving revision 1.1072 diff -u -r1.1071 -r1.1072 --- version.sh 2005/02/18 22:51:22 1.1071 +++ version.sh 2005/02/19 22:50:54 1.1072 ＠＠ -8,4 +8,4 ＠＠ infodock_major_version=4 infodock_minor_version=0 infodock_build_version=8 -xemacs_extra_name="(+CVS-20050218)" +xemacs_extra_name="(+CVS-20050219)"

1 participants
0 comments

CVS update by viteno MODIFIED: xemacs/lisp ... 19 years, 10 months

CVS Monitor

User: viteno Date: 05/02/19 23:25:14 Modified: xemacs/lisp ChangeLog package-ui.el Log: Pui, adapt package name length in display. Revision Changes Path 1.642 +5 -0 XEmacs/xemacs/lisp/ChangeLog Index: ChangeLog =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/ChangeLog,v retrieving revision 1.641 retrieving revision 1.642 diff -u -r1.641 -r1.642 --- ChangeLog 2005/02/18 06:28:55 1.641 +++ ChangeLog 2005/02/19 22:25:12 1.642 ＠＠ -1,3 +1,8 ＠＠ +2005-02-19 Norbert Koch <viteno(a)xemacs.org> + + * package-ui.el (pui-list-packages): The longest package name now + has 20 characters. Adapt the display. + 2005-02-18 Stephen J. Turnbull <stephen(a)xemacs.org> * XEmacs 21.5.19 "chives" is released. 1.24 +6 -6 XEmacs/xemacs/lisp/package-ui.el Index: package-ui.el =================================================================== RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/package-ui.el,v retrieving revision 1.23 retrieving revision 1.24 diff -u -r1.23 -r1.24 --- package-ui.el 2004/11/04 23:05:55 1.23 +++ package-ui.el 2005/02/19 22:25:13 1.24 ＠＠ -607,11 +607,11 ＠＠ ")) (if pui-list-verbose - (insert " Latest Installed - Package name Vers. Vers. Description + (insert " Latest Installed + Package name Vers. Vers. Description ") - (insert " Latest - Package name Vers. Description + (insert " Latest + Package name Vers. Description ")) (insert sep-string) (setq start (point)) ＠＠ -640,13 +640,13 ＠＠ ((numberp current-vers) (setq current-vers (format "%.2f" current-vers)))) (insert - (format "%s %-15s %-5.2f %-5s %s\n" + (format "%s %-20s %-5.2f %-5s %s\n" (car disp) pkg-sym (if (stringp version) (string-to-number version) version) current-vers desc))) - (insert (format "%s %-15s %-5s %s\n" + (insert (format "%s %-20s %-5s %s\n" (car disp) pkg-sym version desc))) (save-excursion

1 participants
0 comments

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

xemacs-cvs February 2005