Mercurial > emacs
view admin/build-configs @ 73575:c39e3aff703e
(mac_create_bitmap_from_bitmap_data): Make variable
`swap_nibbles' static const.
(atsu_get_text_layout_with_text_ptr): Make variables `lengths',
`tags', `sizes', `values' static const.
(mac_draw_string_common): Make variables `context' static. Make
variables `tags', `sizes', and `values' static const.
(pcm_get_status, x_detect_focus_change, x_scroll_bar_handle_click)
(xlfdpat_create, xlfdpat_block_match_1, xlfdpat_match)
(mac_to_x_fontname, parse_x_font_name, add_mac_font_name)
(mac_do_list_fonts, is_fully_specified_xlfd, do_grow_window)
(mac_store_event_ref_as_apple_event, mac_make_rdb): Add const
qualifier to arguments.
(xlfd_scalable_fields, keycode_to_xkeysym_table)
(fn_keycode_to_keycode_table): Make static const.
(mac_load_query_font): Make variables `tags', `sizes', `values',
`types', and `selectors' static const.
(mac_handle_command_event, mac_handle_window_event): Make
variables `names' and `types' static const.
(init_command_handler, install_window_handler): Make variables
`specs*' static const.
(mac_handle_font_event, mac_handle_text_input_event)
(mac_store_service_event): Make variables `names' and `types'
const. Make variables `names_*' and `types_*' static const.
author | YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp> |
---|---|
date | Tue, 31 Oct 2006 08:32:56 +0000 |
parents | a8b22f12b3dc |
children | ddcbd2c1b70d 72dea2ff0142 |
line wrap: on
line source
#! /usr/bin/perl # Copyright (C) 2001, 2006 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 GNU Emacs; see the file COPYING. If not, write to the # Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, # Boston, MA 02110-1301, USA. # Build Emacs in several different configurations. require 5; use Getopt::Long; use File::Basename; use Cwd; @configs = ( ["--without-x", "--optim"], ["--without-x-toolkit", "--optim"], ["--without-toolkit-scroll-bars", "--optim"], ["--with-x-toolkit=lucid", "--optim"], ["--with-x-toolkit=motif", "--optim"], ["--with-x-toolkit=motif", "--enable-checking"], ["--with-x-toolkit=motif", "--gcc3"], ["--with-x-toolkit=motif", ""], ); $log = "/tmp/$$.out"; print "Using log file $log\n"; unlink $log; $root = $ENV{"EMACS_ROOT"}; $root = "/gd/gnu/emacs" unless $root; $rc = GetOptions ("help" => \$help); if ($rc == 0 || $help) { print <<USAGE; build-configs Build Emacs in different configurations. --help show this help USAGE exit 1; } # Chdir to the top-level directory of the tree. If not in a tree # containing Emacs, use the default. while (! -f "src/emacs.c" && cwd () ne "/") { chdir ".."; } chdir $root if cwd () eq "/"; print "Build in ", cwd (), "\n"; foreach $config (@configs) { my $configure_options = @$config[0]; my $make_options = @$config[1]; my $rc; print "$configure_options, $make_options\n"; unlink "config.cache"; $rc = system ("$root/configure $configure_options >>$log 2>&1"); if ($rc != 0) { print "configure failed\n"; exit 1; } $rc = system ("make-emacs --all $make_options >>$log 2>&1"); if ($rc != 0) { print "Make failed\n"; exit 1; } } # Local Variables: # mode: cperl # End: # arch-tag: 20a4452d-610a-4e54-9abc-ffe79f5c0d30