Mercurial > hg > xemacs-beta

comparison src/emacs.c @ 343:8bec6624d99b r21-1-1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-1-1
author cvs
date Mon, 13 Aug 2007 10:52:53 +0200
parents 54f7aa390f4f
children 7c94d56991e1
comparison
equal deleted inserted replaced
342:b036ce23deaa 343:8bec6624d99b
105 Lisp_Object Vsystem_configuration_options; 105 Lisp_Object Vsystem_configuration_options;
106 106
107 /* Version numbers and strings */ 107 /* Version numbers and strings */
108 Lisp_Object Vemacs_major_version; 108 Lisp_Object Vemacs_major_version;
109 Lisp_Object Vemacs_minor_version; 109 Lisp_Object Vemacs_minor_version;
110 Lisp_Object Vemacs_patch_level;
110 Lisp_Object Vemacs_beta_version; 111 Lisp_Object Vemacs_beta_version;
111 Lisp_Object Vxemacs_codename; 112 Lisp_Object Vxemacs_codename;
112 #ifdef INFODOCK 113 #ifdef INFODOCK
113 Lisp_Object Vinfodock_major_version; 114 Lisp_Object Vinfodock_major_version;
114 Lisp_Object Vinfodock_minor_version; 115 Lisp_Object Vinfodock_minor_version;
1976 wampum_all_len[ac]); 1977 wampum_all_len[ac]);
1977 wampum_all_len[ac]++; 1978 wampum_all_len[ac]++;
1978 total_len += wampum_all_len[ac]; 1979 total_len += wampum_all_len[ac];
1979 } 1980 }
1980 DO_REALLOC (run_temacs_args, run_temacs_args_size, total_len, char); 1981 DO_REALLOC (run_temacs_args, run_temacs_args_size, total_len, char);
1981 DO_REALLOC (run_temacs_argv, run_temacs_argv_size, nargs+1, char *); 1982 DO_REALLOC (run_temacs_argv, run_temacs_argv_size, nargs+2, char *);
1982 1983
1983 memcpy (run_temacs_args, wampum, namesize); 1984 memcpy (run_temacs_args, wampum, namesize);
1984 run_temacs_argv [0] = run_temacs_args; 1985 run_temacs_argv [0] = run_temacs_args;
1985 for (ac = 0; ac < nargs; ac++) 1986 for (ac = 0; ac < nargs; ac++)
1986 { 1987 {
2745 FSF Emacs: 19.23 2746 FSF Emacs: 19.23
2746 XEmacs: 19.10 2747 XEmacs: 19.10
2747 */ ); 2748 */ );
2748 Vemacs_minor_version = make_int (EMACS_MINOR_VERSION); 2749 Vemacs_minor_version = make_int (EMACS_MINOR_VERSION);
2749 2750
2750 DEFVAR_LISP ("emacs-beta-version", &Vemacs_beta_version /* 2751 DEFVAR_LISP ("emacs-patch-level", &Vemacs_patch_level /*
2752 The patch level of this version of Emacs, as an integer.
2753 The value is non-nil if this version of XEmacs is part of a series of
2754 stable XEmacsen, but has bug fixes applied.
2755 Warning: this variable does not exist in FSF Emacs or in XEmacs versions
2756 earlier than 21.1.1
2757 */ );
2758 #ifdef EMACS_PATCH_LEVEL
2759 Vemacs_patch_level = make_int (EMACS_PATCH_LEVEL);
2760 #else
2761 Vemacs_patch_level = Qnil;
2762 #endif
2763
2764 DEFVAR_LISP ("emacs-beta-version", &Vemacs_beta_version /*
2751 Beta number of this version of Emacs, as an integer. 2765 Beta number of this version of Emacs, as an integer.
2752 The value is nil if this is an officially released version of XEmacs. 2766 The value is nil if this is an officially released version of XEmacs.
2753 Warning: this variable does not exist in FSF Emacs or in XEmacs versions 2767 Warning: this variable does not exist in FSF Emacs or in XEmacs versions
2754 earlier than 20.3. 2768 earlier than 20.3.
2755 */ ); 2769 */ );