(help-xref-stack-item): Add defvar.

[gnu-emacs] / admin / make-emacs

diff --git a/admin/make-emacs b/admin/make-emacs
index 83683c4126923b119f4483cba00f09440f157484..d17e59e5692d5e746f6d8033feb03963f9d5a9f3 100755 (executable)
--- a/admin/make-emacs
+++ b/admin/make-emacs
@@ -16,8 +16,8 @@
 #
 # 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., 59 Temple Place - Suite 330,
-# Boston, MA 02111-1307, USA.
+# Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+# Boston, MA 02110-1301, USA.
 
 # Build Emacs with various options for profiling, debugging,
 # with and without warnings enabled etc.
@@ -49,9 +49,11 @@ $rc = GetOptions ("help" => \$help,
                  "malloc-check" => \$malloc_check,
                  "no-mcheck" => \$no_mcheck,
                  "alias" => \$aliasing,
+                  "boot" => \$boot,
                  "wall" => \$wall,
                  "gcc3" => \$gcc3,
                  "trace-selection" => \$trace_selection,
+                 "trace-move" => \$trace_move,
                  "stabs" => \$use_stabs,
                  "optim" => \$optim);
 
@@ -64,6 +66,7 @@ Build Emacs.
 
  --help                        show this help
  --all                 make clean versionclean first
+ --boot                        make boostrap, log to boot.log
  --enable-checking     ENABLE_CHECKING=1 (implies Lisp union type)
  --no-warn             disable warnings
  --check-marked                GC_CHECK_MARKED_OBJECTS=1
@@ -75,6 +78,7 @@ Build Emacs.
  --wall                        compile with -Wall
  --gcc3                        use GCC 3.0 (30% slower compilation, slower code)
  --trace-selection     print traces in xselect.c
+ --trace-move          print traces for move_it* functions
  --stabs               use -gstabs instead -g
 
 Default is to compile with warnings, with -DGC_MCHECK=1, and
@@ -107,7 +111,7 @@ if (@ARGV && $ARGV[0] eq "all")
 
 system ("$make clean versionclean") if $all;
 
-if ($wall) 
+if ($wall)
   {
     $warn = "-Wall";
   }
@@ -121,14 +125,14 @@ $defs = "-DGLYPH_DEBUG=1" unless $optim;
 $defs = "$defs -DGC_CHECK_MARKED_OBJECTS=1" if $check_marked;
 $defs = "$defs -DENABLE_CHECKING=1" if $enable_checking;
 
-if ($profile) 
+if ($profile)
   {
     $opts = "-pg";
     $defs = "$defs -DPROFILING=1";
   }
 else
   {
-    if ($use_stabs) 
+    if ($use_stabs)
       {
        $opts = "-gstabs";
       }
@@ -143,6 +147,7 @@ $defs = "$defs -DGC_MALLOC_CHECK=1 -DGC_PROTECT_MALLOC_STATE=1" if $malloc_check
 $defs = "$defs -DGC_MCHECK=1" unless $no_mcheck;
 
 $defs = "$defs -DTRACE_SELECTION" if $trace_selection;
+$defs = "$defs -DDEBUG_TRACE_MOVE" if $trace_move;
 
 # arch=pentium leads to slightly faster code than without.
 $opts = "$opts -march=pentiumpro";
@@ -168,8 +173,17 @@ $opts = "$opts $warn" if $warn;
 $cc = "/usr/bin/gcc";
 $cc = "/gd/local/bin/gcc" if $gcc3;
 
+if ($boot)
+  {
+    chdir "..";
+    system "mv boot.log boot.log.old" if -f "boot.log";
+    exit system "script boot.log $make CC=\"$cc\" CFLAGS=\"$opts\" bootstrap";
+  }
+
 exit system "$make CC=\"$cc\" CFLAGS=\"$opts\" @ARGV";
 
 # Local Variables:
 # mode: cperl
 # End:
+
+# arch-tag: 5c3f9713-9ece-4a12-b3f8-deaff15974ba