annotate lwlib/xlwcheckboxP.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 74fd4e045ea6
children 308d34e9f07d
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
398
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
1 /* Checkbox Widget for XEmacs.
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
2 Copyright (C) 1999 Edward A. Falk
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
3
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
4 This file is part of XEmacs.
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
5
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
6 XEmacs is free software; you can redistribute it and/or modify it
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
7 under the terms of the GNU General Public License as published by the
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
8 Free Software Foundation; either version 2, or (at your option) any
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
9 later version.
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
10
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
11 XEmacs is distributed in the hope that it will be useful, but WITHOUT
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
12 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
14 for more details.
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
15
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
16 You should have received a copy of the GNU General Public License
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
17 along with XEmacs; see the file COPYING. If not, write to
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
19 Boston, MA 02111-1307, USA. */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
20
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
21 /*
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
22 * CheckboxP.h - Private definitions for Checkbox widget
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
23 *
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
24 * Author: Edward A. Falk
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
25 * falk@falconer.vip.best.com
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
26 *
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
27 * Date: June 30, 1997
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
28 */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
29
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
30 #ifndef _XawCheckboxP_h
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
31 #define _XawCheckboxP_h
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
32
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
33 #include "xlwcheckbox.h"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
34 #include "xlwradioP.h"
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
35
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
36 /************************************
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
37 *
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
38 * Class structure
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
39 *
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
40 ***********************************/
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
41
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
42 /* New fields for the Checkbox widget class record */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
43 typedef struct _CheckboxClass {
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
44 XtPointer extension;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
45 } CheckboxClassPart;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
46
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
47 /* Full class record declaration */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
48 typedef struct _CheckboxClassRec {
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
49 CoreClassPart core_class;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
50 SimpleClassPart simple_class;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
51 #ifdef _ThreeDP_h
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
52 ThreeDClassPart threeD_class;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
53 #endif
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
54 LabelClassPart label_class;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
55 CommandClassPart command_class;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
56 ToggleClassPart toggle_class;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
57 RadioClassPart radio_class;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
58 CheckboxClassPart checkbox_class;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
59 } CheckboxClassRec;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
60
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
61 extern CheckboxClassRec checkboxClassRec;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
62
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
63 /***************************************
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
64 *
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
65 * Instance (widget) structure
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
66 *
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
67 **************************************/
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
68
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
69 /* New fields for the Checkbox widget record */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
70 typedef struct {
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
71 /* resources */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
72 Boolean tristate ;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
73
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
74 /* private data */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
75 Boolean pressed ;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
76 Pixmap checkmark ; /* TODO: share these via xmu? */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
77 GC checkmark_GC ;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
78 XtPointer extension;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
79 } CheckboxPart;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
80
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
81 /* Full widget declaration */
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
82 typedef struct _CheckboxRec {
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
83 CorePart core;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
84 SimplePart simple;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
85 #ifdef _ThreeDP_h
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
86 ThreeDPart threeD;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
87 #endif
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
88 LabelPart label;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
89 CommandPart command;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
90 TogglePart toggle;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
91 RadioPart radio;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
92 CheckboxPart checkbox;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
93 } CheckboxRec;
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
94
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents:
diff changeset
95 #endif /* _XawCheckboxP_h */