Mercurial > hg > xemacs-beta
view src/m/sequent.h @ 2775:05d62157e048
[xemacs-hg @ 2005-05-15 16:37:52 by crestani]
New allocator improvements
lisp/ChangeLog addition:
2005-05-15 Marcus Crestani <crestani@xemacs.org>
* diagnose.el: Lrecord and string data statistics.
* diagnose.el (show-memory-usage): Add output for additional
lrecord statistics (currently only string data).
* diagnose.el (show-lrecord-stats): New. Print detailed lrecord
statistics.
src/ChangeLog addition:
2005-05-15 Marcus Crestani <crestani@xemacs.org>
* alloc.c: Add string data statistics.
* alloc.c (dec_lrecord_stats): Use size of lrecord for statistics
and cons counter bookkeeping.
* alloc.c (finalize_string): Add string data statistics.
* alloc.c (make_uninit_string): Add string data statistics.
* alloc.c (make_string_nocopy): Add string data statistics.
* alloc.c (kkcc_marking): Move break out of #ifdef.
* alloc.c (Flrecord_stats): New. Collect lrecord statistics.
* alloc.c (Fgarbage_collect): Use Flrecord_stats.
* alloc.c (syms_of_alloc): Add Flrecord_stats.
* dumper.c: Fix hash table.
* dumper.c (pdump_make_hash): Fix hash table.
* dumper.c (pdump_get_mc_addr): Fix hash table.
* dumper.c (pdump_put_mc_addr): Fix hash table.
* dumper.c (pdump_reloc_one_mc): Fix indentation.
* dumper.c (pdump_load_finish): Add lrecord statistics
bookkeeping.
* lrecord.h: Add string data statistics.
* mc-alloc.c (remove_cell): Lrecord statistics, fix indentation.
* mule-charset.c: Marking through *_unicode_description not
needed.
* symbols.c (init_symbols_once_early): Bump lrecord statistics.
* window.c: Marking through line_start_cache not needed.
* xemacs.def.in.in: Fix typo.
author | crestani |
---|---|
date | Sun, 15 May 2005 16:38:14 +0000 |
parents | ecf1ebac70d8 |
children |
line wrap: on
line source
/* machine description file for SEQUENT BALANCE machines Copyright (C) 1985, 1986 Free Software Foundation, Inc. This file is part of GNU Emacs. GNU Emacs is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2, or (at your option) any later version. GNU Emacs is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with XEmacs; see the file COPYING. If not, write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ /* Synched up with: FSF 19.31. */ /* The following line tells the configuration script what sort of operating system this machine is likely to run. USUAL-OPSYS="note" NOTE-START Use -opsystem=bsd4-2, or -opsystem=bsd4-3 on newer systems. NOTE-END */ /* NOTE: this file works for DYNIX release 2.0 (not tested on 1.3) on NS32000's */ /* Now define a symbol for the cpu type, if your compiler does not define it automatically: vax, m68000, ns16000, pyramid, orion, tahoe and APOLLO are the ones defined so far. */ /* BTW: DYNIX defines sequent, ns32000, and ns16000 (GENIX compatibility) */ #ifndef sequent /* pre DYNIX 2.1 releases */ # define sequent #endif /* crt0.c should use the vax-bsd style of entry, with these dummy args. */ #define CRT0_DUMMIES bogus_fp, /* crt0.c should define a symbol `start' and do .globl with a dot. */ #define DOT_GLOBAL_START /* Data type of load average, as read out of kmem. */ #define LOAD_AVE_TYPE unsigned long /* Convert that into an integer that is 100 for a load average of 1.0 */ #define FSCALE 1000.0 #define LOAD_AVE_CVT(x) (int) (((double) (x)) * 100.0 / FSCALE) /* Name of file the to look in for the kernel symbol table (for load average) */ #undef KERNEL_FILE #define KERNEL_FILE "/dynix" /* Avoids a compiler bug */ #define TAHOE_REGISTER_BUG /* Say that the text segment of a.out includes the header; the header actually occupies the first few bytes of the text segment and is counted in hdr.a_text. Furthermore, the value written in the a_text in the file must have N_ADDRADJ added to it. */ #define A_TEXT_OFFSET(HDR) (sizeof (HDR) + N_ADDRADJ (HDR)) /* This is the offset of the executable's text, from the start of the file. */ #define A_TEXT_SEEK(HDR) (N_TXTOFF (hdr) + sizeof (hdr)) /* (short) negative-int doesn't sign-extend correctly */ #define SHORT_CAST_BUG /* Cause compilations to be done in parallel in ymakefile. */ #define MAKE_PARALLEL & /* Say that mailer interlocking uses flock. */ #define MAIL_USE_FLOCK /* On many 4.2-based systems, there's a rather tricky bug * with the interpretation of the pid/pgrp value given to * the F_SETOWN fcntl() call. It works as documented EXCEPT * when applied to filedescriptors for sockets, in which case * the sign must be reversed. If your emacs subprocesses get * SIGIO's when they shouldn't, while running on a socket * (e.g. under X windows), you should probably define this. */ #define F_SETOWN_SOCK_NEG /* Some really obscure 4.2-based systems (like Sequent DYNIX) * do not support asynchronous I/O (using SIGIO) on sockets, * even though it works fine on tty's. If you have one of * these systems, define the following, and then use it in * config.h (or elsewhere) to decide when (not) to use SIGIO. */ /* Note: This definition not used under XEmacs */ #define NO_SOCK_SIGIO /* Define how to search all pty names. This is for Dynix 3.0; delete next 5 definitions for older systems. */ #define PTY_MAJOR "pqrstuvwPQRSTUVW" #define PTY_MINOR "0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ" #define PTY_ITERATION \ register int ma, mi; \ for (ma = 0; ma < sizeof(PTY_MAJOR) - 1; ma++) \ for (mi = 0; mi < sizeof(PTY_MINOR) - 1; mi++) #define PTY_NAME_SPRINTF \ sprintf (ptyname, "/dev/pty%c%c", PTY_MAJOR[ma], PTY_MINOR[mi]); #define PTY_TTY_NAME_SPRINTF \ sprintf (ptyname, "/dev/tty%c%c", PTY_MAJOR[ma], PTY_MINOR[mi]);