Mercurial > hg > xemacs-beta
view lisp/glade.el @ 5374:d967d96ca043
Conditionalise the old-* functions and byte codes at compile time.
src/ChangeLog addition:
2011-03-15 Aidan Kehoe <kehoea@parhasard.net>
* config.h.in (SUPPORT_CONFOUNDING_FUNCTIONS): New #define,
equivalent NEED_TO_HANDLE_21_4_CODE by default, describing whether
this XEmacs should support the old-eq, old-equal and related
functions and byte codes.
* bytecode.c (UNUSED):
Only interpret old-eq, old-equal, old-memq if
SUPPORT_CONFOUNDING_FUNCTIONS is defined.
* data.c:
Move Fold_eq to fns.c with the rest of the Fold_* functions.
* fns.c:
* fns.c (Fmemq):
* fns.c (memq_no_quit):
* fns.c (assoc_no_quit):
* fns.c (Frassq):
* fns.c (Fequal):
* fns.c (Fold_equal):
* fns.c (syms_of_fns):
Group old-eq, old-equal, old-memq etc together, surround them with
#ifdef SUPPORT_CONFOUNDING_FUNCTIONS.
lisp/ChangeLog addition:
2011-03-15 Aidan Kehoe <kehoea@parhasard.net>
* bytecomp.el:
Don't generate the old-eq, old-memq, old-equal bytecodes any more,
but keep the information about them around for the sake of the
disassembler.
man/ChangeLog addition:
2011-03-15 Aidan Kehoe <kehoea@parhasard.net>
* lispref/objects.texi (Character Type):
* lispref/objects.texi (Equality Predicates):
No longer document `old-eq', `old-equal', they haven't been used
in years.
tests/ChangeLog addition:
2011-03-17 Aidan Kehoe <kehoea@parhasard.net>
* automated/lisp-tests.el:
Only test the various old-* function if old-eq is bound and a
subr.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Thu, 17 Mar 2011 20:13:00 +0000 |
| parents | 7039e6323819 |
| children | 308d34e9f07d |
line wrap: on
line source
;;; glade.el --- Import libglade functions into XEmacs ;; Copyright (C) 2000 Free Software Foundation ;; Maintainer: William Perry <wmperry@gnu.org> ;; Keywords: extensions, dumped ;; This file is part of XEmacs. ;; XEmacs 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. ;; XEmacs 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: Not in FSF ;;; Commentary: ;; This file is dumped with XEmacs (if glade was detected) (eval-and-compile (require 'gtk-ffi)) (globally-declare-fboundp '(gtk-import-function-internal gtk-call-function)) (gtk-import-function none glade_init) (gtk-import-function none glade_gnome_init) (gtk-import-function none glade_bonobo_init) (gtk-import-function none glade_load_module (GtkString . module)) (gtk-import-function GtkType glade_xml_get_type) (gtk-import-function GtkObject glade_xml_new (GtkString . filename) (GtkString . root)) (gtk-import-function GladeXML glade_xml_new_with_domain (GtkString . filename) (GtkString . root) (GtkString . domain)) (gtk-import-function GladeXML glade_xml_new_from_memory (GtkString . buffer) (gint . size) (GtkString . root) (GtkString . domain)) (gtk-import-function gboolean glade_xml_construct (GladeXML . self) (GtkString . filename) (GtkString . root) (GtkString . domain)) (gtk-import-function GtkWidget glade_xml_get_widget (GladeXML . xml) (GtkString . name)) (gtk-import-function GtkWidget glade_xml_get_widget_by_long_name (GladeXML . xml) (GtkString . longname)) (gtk-import-function GtkString glade_get_widget_name (GtkWidget . widget)) (gtk-import-function GtkString glade_get_widget_long_name (GtkWidget . widget)) (gtk-import-function GladeXML glade_get_widget_tree (GtkWidget . widget))