annotate etc/gtkrc @ 5574:d4f334808463

Support inlining labels, bytecomp.el. lisp/ChangeLog addition: 2011-10-02 Aidan Kehoe <kehoea@parhasard.net> * bytecomp.el (byte-compile-initial-macro-environment): Add #'declare to this, so it doesn't need to rely on #'cl-compiling file to determine when we're byte-compiling. Update #'labels to support declaring labels inline, as Common Lisp requires. * bytecomp.el (byte-compile-function-form): Don't error if FUNCTION is quoting a non-lambda, non-symbol, just return it. * cl-extra.el (cl-macroexpand-all): If a label name has been quoted, expand to the label placeholder quoted with 'function. This allows the byte compiler to distinguish between uses of the placeholder as data and uses in contexts where it should be inlined. * cl-macs.el: * cl-macs.el (cl-do-proclaim): When proclaming something as inline, if it is bound as a label, don't modify the symbol's plist; instead, treat the first element of its placeholder constant vector as a place to store compile information. * cl-macs.el (declare): Leave processing declarations while compiling to the implementation of #'declare in byte-compile-initial-macro-environment. tests/ChangeLog addition: 2011-10-02 Aidan Kehoe <kehoea@parhasard.net> * automated/lisp-tests.el: * automated/lisp-tests.el (+): Test #'labels and inlining.
author Aidan Kehoe <kehoea@parhasard.net>
date Sun, 02 Oct 2011 15:32:16 +0100
parents 8d3d05ffbb43
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2082
16489ca72b3d [xemacs-hg @ 2004-05-15 07:43:05 by malcolmp]
malcolmp
parents:
diff changeset
1 # Force the window background to be the same as the default face background:
16489ca72b3d [xemacs-hg @ 2004-05-15 07:43:05 by malcolmp]
malcolmp
parents:
diff changeset
2 # white.
16489ca72b3d [xemacs-hg @ 2004-05-15 07:43:05 by malcolmp]
malcolmp
parents:
diff changeset
3
5442
8d3d05ffbb43 Copyright and short license added to etc/gtkrc.
Mats Lidell <matsl@xemacs.org>
parents: 2082
diff changeset
4 # Copyright 1999 Malcolm Purvis
8d3d05ffbb43 Copyright and short license added to etc/gtkrc.
Mats Lidell <matsl@xemacs.org>
parents: 2082
diff changeset
5 # This file is part of XEmacs, licensed to you under the GNU
8d3d05ffbb43 Copyright and short license added to etc/gtkrc.
Mats Lidell <matsl@xemacs.org>
parents: 2082
diff changeset
6 # General Public License, version 3 or later at your option.
8d3d05ffbb43 Copyright and short license added to etc/gtkrc.
Mats Lidell <matsl@xemacs.org>
parents: 2082
diff changeset
7 # There is NO WARRANTY, explicit or implied, on this file.
8d3d05ffbb43 Copyright and short license added to etc/gtkrc.
Mats Lidell <matsl@xemacs.org>
parents: 2082
diff changeset
8
2082
16489ca72b3d [xemacs-hg @ 2004-05-15 07:43:05 by malcolmp]
malcolmp
parents:
diff changeset
9 style "default_background"
16489ca72b3d [xemacs-hg @ 2004-05-15 07:43:05 by malcolmp]
malcolmp
parents:
diff changeset
10 {
16489ca72b3d [xemacs-hg @ 2004-05-15 07:43:05 by malcolmp]
malcolmp
parents:
diff changeset
11 bg[NORMAL] = { 1.0, 1.0, 1.0 }
16489ca72b3d [xemacs-hg @ 2004-05-15 07:43:05 by malcolmp]
malcolmp
parents:
diff changeset
12 }
16489ca72b3d [xemacs-hg @ 2004-05-15 07:43:05 by malcolmp]
malcolmp
parents:
diff changeset
13
16489ca72b3d [xemacs-hg @ 2004-05-15 07:43:05 by malcolmp]
malcolmp
parents:
diff changeset
14 class "GtkXEmacs" style "default_background"