annotate src/EmacsShellP.h @ 5136:0f66906b6e37

Undo Assert-equal, Assert=, etc.; make `Assert' handle this automatically -------------------- ChangeLog entries follow: -------------------- lisp/ChangeLog addition: 2010-03-12 Ben Wing <ben@xemacs.org> * test-harness.el (test-harness-from-buffer): Undo change of e.g. (Assert (equalp ...)) to (Assert-equalp ...). Get rid of `Assert-equalp' and friends, `Assert-test', and `Assert-test-not'. Instead, make `Assert' smart enough to do the equivalent functionality when an expression like (Assert (equalp ...)) is seen. tests/ChangeLog addition: 2010-03-12 Ben Wing <ben@xemacs.org> * automated/base64-tests.el (bt-base64-encode-string): * automated/base64-tests.el (bt-base64-decode-string): * automated/base64-tests.el (for): * automated/byte-compiler-tests.el: * automated/byte-compiler-tests.el (before-and-after-compile-equal): * automated/case-tests.el (downcase-string): * automated/case-tests.el (uni-mappings): * automated/ccl-tests.el (ccl-test-normal-expr): * automated/ccl-tests.el (ccl-test-map-instructions): * automated/ccl-tests.el (ccl-test-suites): * automated/database-tests.el (delete-database-files): * automated/extent-tests.el (let): * automated/extent-tests.el (insert): * automated/extent-tests.el (props): * automated/file-tests.el: * automated/file-tests.el (for): * automated/hash-table-tests.el (test): * automated/hash-table-tests.el (for): * automated/hash-table-tests.el (ht): * automated/hash-table-tests.el (iterations): * automated/hash-table-tests.el (h1): * automated/hash-table-tests.el (equal): * automated/hash-table-tests.el (=): * automated/lisp-tests.el: * automated/lisp-tests.el (eq): * automated/lisp-tests.el (test-setq): * automated/lisp-tests.el (my-vector): * automated/lisp-tests.el (x): * automated/lisp-tests.el (equal): * automated/lisp-tests.el (y): * automated/lisp-tests.el (featurep): * automated/lisp-tests.el (=): * automated/lisp-tests.el (six): * automated/lisp-tests.el (three): * automated/lisp-tests.el (one): * automated/lisp-tests.el (two): * automated/lisp-tests.el (five): * automated/lisp-tests.el (test1): * automated/lisp-tests.el (division-test): * automated/lisp-tests.el (for): * automated/lisp-tests.el (check-function-argcounts): * automated/lisp-tests.el (z): * automated/lisp-tests.el (eql): * automated/lisp-tests.el (test-harness-risk-infloops): * automated/lisp-tests.el (erase-buffer): * automated/lisp-tests.el (sym): * automated/lisp-tests.el (new-char): * automated/lisp-tests.el (new-load-file-name): * automated/lisp-tests.el (cl-floor): * automated/lisp-tests.el (foo): * automated/md5-tests.el (lambda): * automated/md5-tests.el (large-string): * automated/md5-tests.el (mapcar): * automated/md5-tests.el (insert): * automated/mule-tests.el: * automated/mule-tests.el (test-chars): * automated/mule-tests.el (existing-file-name): * automated/mule-tests.el (featurep): * automated/query-coding-tests.el (featurep): * automated/regexp-tests.el: * automated/regexp-tests.el (insert): * automated/regexp-tests.el (Assert): * automated/regexp-tests.el (=): * automated/regexp-tests.el (featurep): * automated/regexp-tests.el (text): * automated/regexp-tests.el (text1): * automated/regexp-tests.el ("aáa"): * automated/regexp-tests.el (eql): * automated/search-tests.el (insert): * automated/search-tests.el (featurep): * automated/search-tests.el (let): * automated/search-tests.el (boundp): * automated/symbol-tests.el: * automated/symbol-tests.el (name): * automated/symbol-tests.el (check-weak-list-unique): * automated/symbol-tests.el (string): * automated/symbol-tests.el (list): * automated/symbol-tests.el (foo): * automated/symbol-tests.el (eq): * automated/symbol-tests.el (fresh-keyword-name): * automated/symbol-tests.el (print-gensym): * automated/symbol-tests.el (mysym): * automated/syntax-tests.el (test-forward-word): * automated/syntax-tests.el (test-backward-word): * automated/syntax-tests.el (test-syntax-table): * automated/syntax-tests.el (with-syntax-table): * automated/syntax-tests.el (Skip-Test-Unless): * automated/syntax-tests.el (with): * automated/tag-tests.el (testfile): * automated/weak-tests.el (w): * automated/weak-tests.el (p): * automated/weak-tests.el (a): Undo change of e.g. (Assert (equalp ...)) to (Assert-equalp ...). Get rid of `Assert-equalp' and friends, `Assert-test', and `Assert-test-not'. Instead, make `Assert' smart enough to do the equivalent functionality when an expression like (Assert (equalp ...)) is seen.
author Ben Wing <ben@xemacs.org>
date Fri, 12 Mar 2010 18:27:51 -0600
parents 74fd4e045ea6
children 697ef44129c6 308d34e9f07d
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1 /* Emacs shell widget internal header file.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
2 Copyright (C) 1994, 1995 Sun Microsystems, Inc.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
3
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
4 This file is part of XEmacs.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
5
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
6 XEmacs is free software; you can redistribute it and/or modify it
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
7 under the terms of the GNU General Public License as published by the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
8 Free Software Foundation; either version 2, or (at your option) any
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
9 later version.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
10
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
11 XEmacs is distributed in the hope that it will be useful, but WITHOUT
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
12 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
14 for more details.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
15
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
16 You should have received a copy of the GNU General Public License
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
17 along with XEmacs; see the file COPYING. If not, write to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
19 Boston, MA 02111-1307, USA. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
20
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
21 /* Synched up with: Not in FSF. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
22
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
23 /* Written by Ben Wing, May, 1994. */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
24
398
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents: 0
diff changeset
25 #ifndef INCLUDED_EmacsShellP_h_
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents: 0
diff changeset
26 #define INCLUDED_EmacsShellP_h_
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
27
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
28 #include "xintrinsic.h"
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
29 #include <X11/ShellP.h>
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
30 #include "EmacsShell.h"
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
31
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
32 /****** TopLevelEmacsShell ******/
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
33
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
34 typedef struct { /* new fields for TopLevelEmacsShell class */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
35 int dummy;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
36 } TopLevelEmacsShellClassPart;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
37
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
38 /* full class record declaration */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
39 typedef struct _TopLevelEmacsShellClassRec {
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
40 CoreClassPart core_class;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
41 CompositeClassPart composite_class;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
42 ShellClassPart shell_class;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
43 WMShellClassPart wm_shell_class;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
44 VendorShellClassPart vendor_shell_class;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
45 TopLevelShellClassPart top_level_shell_class;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
46 TopLevelEmacsShellClassPart emacs_shell_class;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
47 } TopLevelEmacsShellClassRec;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
48
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
49 typedef struct { /* new fields for TopLevelEmacsShell widget */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
50 int width_cells, height_cells;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
51 int min_width_cells, min_height_cells;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
52 } TopLevelEmacsShellPart;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
53
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
54 typedef struct _TopLevelEmacsShellRec { /* full instance record */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
55 CorePart core;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
56 CompositePart composite;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
57 ShellPart shell;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
58 WMShellPart wm;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
59 VendorShellPart vendor;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
60 TopLevelShellPart top_level;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
61 TopLevelEmacsShellPart emacs_shell;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
62 } TopLevelEmacsShellRec;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
63
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
64 /* class pointer */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
65 extern TopLevelEmacsShellClassRec topLevelEmacsShellClassRec;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
66
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
67 /****** TransientEmacsShell ******/
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
68
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
69 typedef struct { /* new fields for TransientEmacsShell class */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
70 int dummy;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
71 } TransientEmacsShellClassPart;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
72
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
73 /* full class record declaration */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
74 typedef struct _TransientEmacsShellClassRec {
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
75 CoreClassPart core_class;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
76 CompositeClassPart composite_class;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
77 ShellClassPart shell_class;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
78 WMShellClassPart wm_shell_class;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
79 VendorShellClassPart vendor_shell_class;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
80 TransientShellClassPart transient_shell_class;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
81 TransientEmacsShellClassPart emacs_shell_class;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
82 } TransientEmacsShellClassRec;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
83
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
84 typedef struct { /* new fields for TransientEmacsShell widget */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
85 int width_cells, height_cells;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
86 int min_width_cells, min_height_cells;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
87 } TransientEmacsShellPart;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
88
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
89 typedef struct _TransientEmacsShellRec { /* full instance record */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
90 CorePart core;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
91 CompositePart composite;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
92 ShellPart shell;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
93 WMShellPart wm;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
94 VendorShellPart vendor;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
95 TransientShellPart transient;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
96 TransientEmacsShellPart emacs_shell;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
97 } TransientEmacsShellRec;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
98
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
99 /* class pointer */
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
100 extern TransientEmacsShellClassRec transientEmacsShellClassRec;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
101
398
74fd4e045ea6 Import from CVS: tag r21-2-29
cvs
parents: 0
diff changeset
102 #endif /* INCLUDED_EmacsShellP_h_ */